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Customer Satisfaction 



If you discover phySiMl dBlecla in tf>E manuals dstribuTed wllh an Apple proaiicl oi In Hie media ori 
wh'CTi 3 sofiware produnl is disirlbuled, Apple wiK retface Ihe dQcumentaiian qj medra al no 
charge to you duFing the 90-Oay ceriod ni\^ y'^*^ pufchaaeti fhe proOucl. 

Jn aOOiTicm, it Apple releases a corischve update la a softwais produtT during the 90-day period 

alter yoii purchHEied "le soJtware, Apple will replace the appkrihlc diakettea iind documefifgoori 
with thie rfltflsed veiaion ar r^i charge lo you dunn§ the si" months aher the date ot purchase 

In some caunT^ea Ihe replacemenl penod rnay bs ditterenl: check with your authorized Apph* 
Oealef RetiirnahyltemtDJwreplacedwithproufolpurchaseloAppleDr an aulhorued Apple 
dealer 



Limitation on Warranties and Liability 



Even Ihough Apple has tested the sollware described in lhi& manual and reviewed ils conlentSr 
nflilhoi Apple nor lis saftware suppliers make any warranfy or repiesenlatfDn.eitfief express or 
implied, with respect to fhis manual or fo the software deiic'ibea in ttna manual, thplrquplily, 
pertormance. merchanlahiliTy or litness for nny particular purpose Asaresult this sollware and 
manifal are sold "as is, ' and you tne purchaser are assuming the enure risk as to their auarily and 
perlormiince In no evenl wH Apple or Its soJhvareiiuppliefStHi liable lor direcl, inDlrect hncidenlal, 
□r con^equunh^L d^un^guS r[?sul1ing f ro<n any d^loclm ifie soEtware or manusf. cvirn if thc'yhnui? 
been advised of Ihe possibility of siich cLBmagoB in particular, they shall h3ve no liabihly tor any 
pingramsDrdaTaslcwedinorusedwIh Apple prDducls.mcJbfling [he costs ol recovering ar 
reproducing [hese prpgr^ms or diita. Some states do ncUlk>w rhE ficlii'^lon or limitation Ljl un plied 
warranhes or liebihly formcidenlBl or consoqupnliHl damages, so ihp above limilBlion or exclusion 
may not apply lo you 



Copyright 



This manual and the softwAjejCDrnputerprogramafdescnbed in It are copynghled by Apple Qr by 
Apple 6 ^trw^e supplier^ wMhaHt'ghls reserved Under the copyrlflht faAs (hrsmflnuJilorthc 
programs may not be copied, mwhoteor part, without Ihe wrjhen consent ol Apple, ei-cept in Ihe 
normal use of the software or lomaHeatiackup copy This extepfioriUDe5nt,r allow copies lobe 
made for Qihefs wrief her nr nol sold buf all □! the material purchased iwilhaH backup copteal may 
besold, given or JoEnHdlOBnolherpprson Under the law copying includes fran^atmg inio 
anothei language 

Vou may use Ihe soflware on any computer owned by you bul extra copies cannor Tie made lor this 
purpose For some pmaucrs, a multi-use InCense may be purchased rodllow Ihe software [D be 
used en more Ihan one gampuler owned Dy "he purchaser, jndudmg a shaj-cd-diSk system, 
(Canlact your aulhonjed Apple dealer Ux inlcnnaliDn on multi-use licenses,) 



Product Revisions 



Apple cannot guarantee that you will receive nortne ol arevlsion to the softw^^ descnbed In this 
manual, even if you havti returned a legistrahon card received with the product You should 
periodically check wilh your auEhorc^ed Apple Di^alfir 

a I9ai. 1362, 18B3 by Apple Compuler. Inc 

20525 Manani Avenue 
Cupertino, Calilornia 95014 
(40fi) 996-1(110 

Apple and the Apple kjgc are registered trademarks d Apple Computer, fnc 
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CHAPTER I 

INTRODUCTION TO PASCAL 1.2 



[n Chlfl chapter, you wiU learn ahout Che main feaCures of Pascal 1.2 
and how to use rhla manual. 



SYMBOLS USED IN THIS MANUAL 



This manufll uses Three symbols to call your attenttun en imporUnt 
points: 



Thip iseaDB Che fl(ljace»c pacagcaph contalna Information 
especiall;? uaeful to you—a "helping hand." 



;::N ThlB tails you to he alert. The adiscent Indented paragraph 
iJ>) deacrlbea an unuflual aspect of Pascal 1.2. 



This scop 5lgn Ik ;i warning. Pay attentEonI The adjacent 

indented paragraph deacribes an action Chat could be hazardous 

CD Che program or files you are using, or to your computer 
hacdware. 
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WHAT IS PASCAL 1.2? 



^- 



HOW TO USE THIS MANUAL 



Apple 11 Paacal [Combines a lauguagf and an operating aysCem. You can 
use It fln an Apple lU coirpucec or on an Apple II or TI Plus computer 
that has at least i8K nenor]' capacity and an Apple Language Card. 



From chia point an In chia leanual , the term "Apple tl'^ refers 
to both the Apple 11 and the Apple II Pluu, as distinguished 
Erooi the Apple lie. 



Pascal 1.2 l3 an Impcaved version of Pascal Kl, The bKisIc progrm 
design and the way the user Interacts with it have not changed. The 
improvenentg conelcic of ne* features, corrections of bugs, a 128K 
systenit and various modi flcal Ions supporting the use of the Apple lie 
conpiiter, 

Pascal 1.2 conslats of four systeni disks labeled 



APPLES 
APPLE I 
APPLE? 

APPLEl 



and a set of tuo manuals In addition to tbia 1-2 Update inanuQl: 

• Apple Paacal Language Ref eronce Manual f«ith Addendum) 

* Apple Pascal Operating Syatem Rcfetence Wanual (with Addendum) 



WHO NEEDS PASCAL L2? 



2 



You ne^d Pascal. 1.2 ^Haftware and manualE} 

• If you will be Tisln^ Apple TI Pascal fai: the Elrsr CtTDe and 
want Co atacl out with an up-to-date system; 

• Tf you have been uainE Paacal I.L oc l,t^ and want to take 
advantage nf Che several t tfi prove men cs found In version 1.2; 

• If you plan Co use Paacal on the Apple He oOTriputer end wane 
the Pascal features that particularly support the Apple He: 

• If you have an Apple He with the Extended R0-Colunm Texc Card 
and want to lake advantage of Che additional memory capacity 
and featucea available with Che Pascal 1.2 128K aystera. 
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You should Elrsc page tbrougb this iHanual to become fflaillar with its 
topics and the kinds of reference alda available in the AppendlKea. 

If you are a new uaer L)f Apple H Pascal, vou should learn Che Pascal 
syataio by studying the api of original Pascal inanualR and addp?nda» and 
by practicing the use nf vartoug conponents, such as the Paacfll Editor, 
Filer, Compllei, and so on. Then you should go to Chapter 2 of this 
manual, "New Pfiscal Features," «hich di^cua^es In datail Che 
improveiients to Paacal and certain optlnns available v^lthln the system. 

If you are a practiced user of Apple II Pascal, vou sbould scan the 
contents of this manual for what might be helpful to you. pjirticularly 
Chapter 2. "fJew Pasi:al F^at^ires." and Chapter 4. "Tips for Ptogrammers . " 

If you are an Apple He user, you should read the deHcrlption of Paacal 
modifications supporting tha Apple lie In Chapter 2, "New Pascal 
Features." 



/^^ If you use the 40-coIueiih screen width on an Apple tl or He, ot 
K^ Che af^-cnlumn screen width on an Apple II, you shonld read the 
^-^ aecclon in Chapter 2 called "Special MISCINFO FHpg and How to 
Use Them" before using your Pascal U? system. 

If you are now using or plan to uair the ^pple He with the 

Ei^tended H0-Coliiran Tent Card, read Chapter 3, "The Pascal l?flK System." 

Appendix A la a list of bugfi in Pflflcal 1,1 that have been fixed in 
Pascal 1.2, 

Appendix b gives a complete list of the file*, on the Pascal I.? disks. 

Appendix C presents an updated list of all Compiler error inesseges, aa 
well as the one new Appembler error nessage- 

Appendix D explains how to activate the SHIFT-koy iDodif Icatlon In the 
event that this hardware change has been made to your coiaputer and 
you want your Pascal system to use it. 
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ABOUT YOUR PASCAL 1.2 SOFTWARE 



Your time will he well spent If you take a Eew ntlnutefl now to get 
acquainted with your Pascal software before scarcing up tlie gystem. 

THE PASCAL 1.2 DISKS 

Table 1-1 Is a fluramary af the contentu of each Pascal 1,2 dtslc, You 
may arrange these files to suit your special text-edlctng or 
pragram-developnient needs. (See Appendix B for an iteitUed list qf the 
filgu nn Che four Pascal 1.2 disks. Von will find a table chat 
deBcrlbea Che Individual system files In Appendix D of the 
Apple Paacfll OpgraCing Systein Reference Manual. ) 



As a precaucion, however, you should not rearranj^e Cho fllea on 
the original disks of an the backup cdples you will make- 
Rather, vou should prepare a special, cuBtomlzed disk, 
transferring tho^e files to It that you want together. 



MAKING COPIES FOR BACKUP 

Before going on, nake a copy of each Paacal 1.2 syeten disk for your 
everyday use, Htorlng the orl£inal& as backupa In case of disk damage 
or unusual wear. See AppendEic D in the Apple Pascal Language Reference 
Manual for directions on making backup dlakn. 
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The Disk Itff CeneralContents and Purpoae 

APPLE0: Contains all the files needed to edit and run 
Pascal prograna, ^specially on a one-drive 
systeiB; It includes SYSTEM. COMPILER, but not 
SYSTEM. APPLE, which is needed to start up the 
syaCen. This Is the second af two disks 
used for a two-atage startup on a one-drive 
syaCeiD. 

APPLEIt Concaina all che files you need to edit CexC and 
to scare up Che syatem. In conjunction with che 
APFLE2t disk, it te used to Compile or Run your 
text. 

APPLE2: Contains the Compiler, Linker and Assembler, as 
uell as certain other program-development tool:?. 

APPLET: Contains SYSTEM. APPLE , the Formatter progcan, a 
few denanstracion programs for Che general user, 
and che files named 12eK. PASCAL and 128K, APPLE, 
which are special versions of sy^cem files needed 
for ualng Che additional memory available with 
the Apple lie Estended B^-Column Tent Card. It 
also contains three specialized MlSCIWFn files: 
1I40.MISC1NFO, lIEiifl.MlSClNFO, and 1 ia0,MlSClNFO, 
This is the first of two disks used for a cwa-^tagi 
BCarCup. 



Table 1-1 . Sunnrary of Files on the 
Pascal L.2 Disks 



MIXING PASCAL 1,1 AND PASCAL 12 

You should not mlit any aystem files from the two versions of Apple II 
Pascal. The two veTslonfi are incompatible because essentially all of 
the files were changed in the updating from Pascal I.I to 1.2. 

The Pascal K2 operating system (In Che SYSTEM, PASCAL file) and Che 
oCher componenCs of che Pascal system (che Flier, Editor, Compiler, 
AssembLer, Linker, and others) rauac work cogeCher as a unit. The 1.2 
operating Eyatem — any 1.2 component, in facC — should not be run with 
a !.] version af any other Pascal component. The operating system 
will check for Chls condition at exeoucion time and noCify you of an 
Incorrect version of a Pascal system component. 
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RUNNING VERSION-l,l-COMPILED PROGRAMS 
UNDER 1,2 

In general, version 1.2 Is coinpdtlblp with application ptograna that 
were compiled under vetaion l-t, allowing vau to run prograraa und^r 
Pascal 1,5 chflC were designed to run under Pflfical I.E. In special 
ctrcupiEtances, however, you might have to make one or both nE the 
follawtng ch^n^^s: 

• You may have to upgrade the Original SYSTEM. LIBRARY file that 
supported Che application program and reaLdea on the prograiD 
disk. The reason ts that En the Pascal 1.2 SYSTEM. LIBRARY, 
these units have been changed or are affected h^ changes In the 
operating B/stetn: 

PASCAL 10 

CHAINSTUFF 

LONGINTIO 

TUBTLEGRAFHICS 

Consequently. If you have on a program disk a Pascal L.I 

SYSTEM, LIBRARY fHe tftth any of theae units, you will need to 

replace such unlt^ with their counterparts From the Pascal 1.2 

SYSTEM. LIBRARY. You change unite In a SYSTEM, LIBRARY file by 

means of Che Pascal Librarian proKrara explained in Chapter S of 
the Apple Pascal Operatlnfi System Reference Manual . 

• You may have to change the program to get the correct values 
for the up-cursor and down-cursor keys, if the program uses 
the^o because programs hard-coded to check for the Paacdl 1.1 
up'-curaor and down-curaor keyboard values rfUl not work 
properly if run under Pascal 1,Z. You will need to change auch 
programs to obtain the new values from the Pascal 1.2 

SYSTEM. MISCINFO file at load time. 



USING YOUR NEW SOFTWARE RIGHT AWAY 

If you are using an Apple He with an fl^-coluinn card and knou how to 
start up and use the I'ascal language ^nd operating system, you can use 
Pascal I.Z right away. However, if you use an Apple I[ or an Apple lie 
without an Bfl-coiumn card, you should change SYSTEM. MI SCITJFO filea 
according to the directions given in the third aecclon of Chapter 2, 
"Special MISCINFO Files and How to Use Them." 
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STARTING UP A ONE-DRIVE SYSTEM 

To start up Pascal 1.2 on a one-drive gysCem. follou these steps: 

1. Insert APPLE3: In the drive. 

2. If Che computer's power is ofE, Cum It on. Tf It is already 
on, press CONTROL-RESET (on -in Apple H) or 
CDMTROL-DPES- APPLE-RESET (on an Apple lie). 

In some cases, such as after running a copy-protected program, 
you may have to turn the power off, then on^ 

3. After the niegsage 

"Insect hoot disk with SYSTEM, PASCAL on it, then 
press RETURN '' 

appears on the screen, insert APPLE0: In the drive and press 
RETURN. 

Once you have started Che system, you can testart it by selecting Halt 
or Initialize from the coramand line (with APPLE0: in the drive). 



STARTING UP A TWO-DRIVE SYSTEM 

To start up Poscal I.? on a two-drive system, follow these steps: 

1, Innert APPLEl: In drive 1. 

2, If the computer's power is off, Cum it on. If it Is already 
on, press CONTROL-RESET (on an Apple tij or 

CONTROL-OPEN- APPLE-RESET Con an Apple tte). 

In some cases, such aa after running a copy-protected program, 
you may have to turn the power off, then on. 

Once you havp started system, you can restart it by selecting Halt or 
Initialize from the command line (with APPLEl: in drive 1). 
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ASCAL FEATURES 




FEATUHES POft ALL APPLE II «lMPErTKftS 

A Changed Two-F .-tap nt "Booi" 

A Nov Lfn# on tii^ •■•,..•- ^i SuBt^ap Strewn 
If y^u l>o Not Put Back th* SUrtiip Tft^k 
Tlif 



n _ . _ 



VreHx 

<''!-•<> ^thi-c PtograoiH During txvcutlon 

A IBev ^ . iplScn 

AddltliLuL Oii>i_l( Volrnae UnttB 
lirtoi H«-qfljj{«r Toij Many ?TO£raiii SfflnenEji 
Contcol CtuiiacEtro Nol Echoed to th* Screen 
Hantf-Concrdl QucCoaa dntl tlifl ^tElFT Key 
Thff CTBL-] FunttlciTi 

FEATURES FOB Tttf. APPLE I IE COMFUTER 
Lov^ccflBB and Llppetcnsi; ]Vot»i Avjiliablf 
Four Cursor Kej-« Nnw Avairahlfl 
Reyfltroke Fimqclons Not Used 
OPEN-APTT''. '^i-kf ;'i-,i.Pn F, fliid Slliri' Keys 
Apple J -. Kpv>jaards 

' '' "' i,. -Jia KKtcHtlon 

•LS ANO HOW TO USE THEM 
' le II Usor* 

,-L.uiinii li^pifl Tie U**r9 
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ASCAL FEATURES 






Uhvthar you una n 9t*T\Ant6 AppU TT, A^ipl* 11 Plus, or App;« He 
c^qpulGi:, tlir flrtt Hctlon of thLe ch4pC«[ tellv yott About n«w t<sB{:nl 
f«4ti)f«i you may (i««i If yt>u (ta« 4A Appl# 11a. ymi chauld tfwl cha 
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The Ffttloslng ehnnecEt nte laparcant for nil uien af PaSfUl l.Z 
on jiny ApT>l' H '»' ^^^ eniiftuur. 

IMPROVED DISK-FORMAHING PROGRAM 

The prograa IhaC |)repiire« 4 new dlik befot? Lt ran be ueed— the Pas^«1 
PaciuCt«r-"hn? Lnproved, mare nueanini^uX error BasflH^e*, The flane two 
disk tiiv9 4rtf ;(9«iJ JIB before: 

FOftMATTlLK.CODE - found an dl^k APPLEii; uftcd la any drive. 

FOHMATTCH>flATA - in,.,frflcElv callfid "FOK>t''Tr^:K. IMXI" In the 
■Vf ' ||I ^.P3ECJl_ OperaClnp System fipiprence 
l -^anufll : fourirt oa disk APPLES^; ua*d Ln any 
dtlve. 

Aftor you type X FWRMATTEM . OIIIE , yoii Bt« Chls revtMd qrieon nasHiiflp; 

APPLE P\SCAL OISK FiJSMATTEft PRfxiKAM (l.?l 
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The FormaCter error neaBflges have been revised nnrl incceflsed In numher 
to help you hettpc understand, why the progmm Ig having trouble 
FprniHttlng your disk. These qre Che error rneBsages Chat you might flee 
displayed: 

• Disk ig wrlce pracected 

• Unshl? to fcrnLaC diskette 

• Drive ?peed Is toa slow 

• Drive speed la toa faac 

Pot Infitrucrlong on uaing the FfiTmatter, see the Apple Pascal qperaclnt;^ 
System Reference Hanuat^ . Chapter 8» 

A CHANGED TWO-STAGE STARTUP OR "BOOT" 

If you use a twa-stage startup procedure to begin running your 
Pascal 1.2 systeni, you ulLl find an inportanr: change In Che prornpt chat 
coneB on your screen after you start up your first aysfem disk. Tou 
tflll be directed to Insert yoar second startup disk (one containing 
SVSTEM, PASC^lL)- and press RETURN- {Under Pascal l.l, the prompt asked 
you to press RESIST. Now, if you press RESET hy Icself. nothing will 
happen.} Eor Information on how to start up ("boot") your system, see 
the end of Chapter 1 of this manual and sea Chapter 2 of the 
Apple Pascal Operating System Reference Manual * 

A NEW LINE ON THE PASCAL STARTUP SCREEN 

The Pascal startup screen now displays a new line that specifies 
whether the Pascal Interpreter and operating system you are uainfl 
are b^K or IZ8K. Every time you start up Pascal J, 2, Che first 
screen display to appear «111 Include either the words 

Fflflcal System Size Is 6AK 
or the uords 

Pascal System Sl£e Is 128K 

(The Pascal IZSH syaten is discussed in Chapter 3 of this manual.) 

IF YOU DO NOT PUT BACK THE STARTUP DISK 

If the system raturni to the command line and yrju have not pnt the 
startup disk back in drive t, you now sea an expanded reminder on the 
sc reen : 

Put In <boot dl5kette>: 
Chen presfi HETUF^ 



Under Pascal l.l, only the flrnt line of the oesBage appears, and 
drive I spins continuously until you insert the correct startup disk. 
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THE PERCENT PREFIX 



Pascal 1.2 gives you a tool that makei your program independent of 
volume name^. You can now use the percent character (!t) as a prefix, to 
a filename Co mean "the sama volume name as the cHecuting program," 
For example, if the program 

MYFILE: HIS. CODE 

is currently being eKecuted, the percent prefix caii be used to 
represent The volume name 

MYFTLR: 

during the exacjtion of this program and until another pcogram Is 
executed. 

Instead of giving the volune n'^me and filenames of files used hy the 
program, soch as 

MTFlLB:DArAl 
MYFtU:DArA2 

your program can now simply specify Ihem by attaching the percent 
prefix Co their filenames: 

IDATAI 

Sdata? 

The percent prefix allovs you to write an application program that can 
Call files without hard-coding ^jolume names into it. The application 
can be on any vnlume in the system as long as the files used by the 
program reside on Che same Lrninme. Moreover, the user can move the 
program and Its related files to another volume In the system^f lexlble 
(sometlnies called "floppy") disk or rigid disk— without changing the 
pCDgram.. 

To vine the percent prefix, you First place the files, such as the ^lata 
files just mentioned. In the same volume as the executing program, and 
then you use the percent prefix, whenever you need Lt, as a substitute 
For Che volume name. This capability free^ ynu From having to know and 
use the volume name of Che program file (and of the program's library 
and data files). 

When you execute a program, the percent prefix is set as soon as Che 
system haa determined chat the volume name and Filename are valid and 
refer to an actual file. (The volume that contains this file must be 
on line.) The prefix is not set to another volume name vhlle the 
Current program Is executing, but when you execute another application 
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program, or a syqcem prosram such ae the Pascal Flier, Editor, or 
Compiler, then Lhe percent preftJt is act by che eysteo to another 
uoluioe name, which Is that of the ne* program. 

Although you can oae the perrent preflK at the systein level — for 
exAiiiple» with the List or Transfer cooimarLd of the Filer — note that 
It haa three basic uses within a proflram : 

• acCESStng filea during program execution (discussed later In 
this chapter) 

• chaining to other programs during execution (discuBsed later In 
this chapter) 

• naming files in a Library Name Pile U2BK syHtan only, 
dlficuBSed in Chapter 3) 



Accessing Files During Program Execution 

Most appiicaCEuri programs cequLre the use of nurne rous files (Ulce data 
filEH, output files, temporary files, and so forth) during execution. 
These Eiiee ueually reside in the same ^loiune an Che main program. 
Using the percent prefix, you can specify these files in the Toaln 
progtam without having to know [heir volume najne. For example , If the 
program MIX-CODE uses the files DATAl and ttATAl, you vould want to 
group the uet of programs In the same volume: 



MVFIU: 
MIX. CODE 
DAT 41 

data: 



la volume) 

Ian executable program) 

ia data file) 

(a data file) 



Then in the source code for program MIX. CODE, you can specify the two 
data flies using the percent pceflR In these seringa: 

HDATAl 
:iDATA2 

Here are two examples of source code showing possible uses of the 
percent prefix: 

RES£T(A_F1LE, '^DATAl*); 
BEWflITE(B_FILE, 'iDATAZ^i 

Thus you do not have to speclfv the actual volurae name Cln this case, 
f-TfFlLE:), You are free Co place this set of files in any voluirve. Jlth 
any name, as long as they all reside in the sarae volume and as long ss 
that volume Is on line at the time of pfogram execution. 
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Chaining to Other Programs During Execution 

When your ptograra uses chaining, yoii can use the percent prefix to 
specify the volume name of the projsram Co be chained to. For example, 

If you want the set of programs 



KASTRR^LAN : 
PARAHS. CODE 
BUDGET. CODE 
GOAL 5. CODE 
FOKECST.CDDE 



fa volume y 

(an executable program] 
(an executable program) 
(an executable program) 
{an executable pragram) 



to be executed In the order GOALS. CODE —> PARAMS.CODE --> BUDGET. CODE 
— > FOREGST.CODE, you use these calls to Che SliTGHAXN procedure: 

• Ln COALS. CODE use the procedure call 

3ETCflAINC'lPARAMS'): 
« In PARA^S.CODE use the procedure call 
SETCHAIN('KHUDGET')i 

• In BUDGET, CODE use the procedure call 

SETGHAIN^'IFDREGST" ); 

By using the percent prefix when specifying the next file to be chained 
to, you avoid having to know the file's volume name. To start running 
the programs 13 the chain, you execute HyFlLK:COALS, Again, all that 

is necessary la that you place the flleK on line and In the same vnlurae, 

Chaining to a jrogram during execution Is expliiinEd In the 
Apple Pascal Linguage Reference Manual Addendum . 

A NEW SWAPPING OPTION 

Version 1,2 of the Pascal operating system mskea available 822 
additional bytas of memory that car be used for any activity that needs 
more system memory. 



Application pto^ram writers should not depend on this extfA 
memory being avsilahle In the futuce because 

Apple Computer, Inc. has reserved It for future use. No more 

inemory is guaranteed than that available under Pascal 1.1. 



Tn obtain this additional memory, you will need to use the revtaed Swap 
command accessed from the command line. The new prompt screen for the 
Swap command gives three swapping options. The first two correspond to 
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the old ^'toggle" opcion ChaC parralttcd you to turn suapplng on or off 

and that mflde avq[lat>le 2.23A extra bytes at iDemorv. Ths third option 

providPB Che flddlcional memrjry. (Table 2-1 IlfltB the three awapptng 
optionH.) 

The fisv stjapplag option provldBH more qpace hy mavlng the procedurea 
IIET and PUT from dlst to m^ln meraury only as they are needed by your 
program. To do this, set swapping to "2" frora tlie prompt ncreen thBC 
appears up when you type "S" for Suap fcon the conmand line. 



Note Che wamlnE chat ufllnj^ GET or PUT to disk will he alow If 
you select Swapping option 2, since these routines will have to 
be loaded repeatedly. 



tf 



Suappla^ 
Option 

Swap Is off 



First level 
Swap Is on 



Second level 
Swap Is on 



Selection 
Code 



System Action 

Swapping set do OFF, Set autoraat- 
Ically at startup, or boot, time. 
Or set by typing "0" after typing 
"S" from the co<maand line- 

FlrHC-level swapping set to ON In 
order to H^in spiii^e in main meraory. 
Sec by typing "1" after typing "S" 
Ecom the comcnand line. 

Second-level swapping set to ON In 
order to gain even more gpace In 
main memory. Tncudes everything 
Ruapped at first level and adds 822 
iBore bytop. Sot by typing "2" after 
typing "S" from the comnand line. 



Total 
Memory Gain 



2,362 
by tea 



3.0BA 
bytes 



Table 2-1 . Swapping Options 
ftvallahle at the Systeia Level 

For a description of bow to use these swapping options from a program 
when chaining to another program, see the section "A Now Swapping 
Procedure For Programs" In Chapter A. 
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ADDITIONAL BLOCK VOLUME UNITS 

Eight new anitfl, numbers 13 through 20, have been added to the original 
available block units, numbers A, 5, 9. .12. The opeTaling syBtem 
treats the new units the Hame an it did the original oneq when, for 
e^ample^ it scans units as it looks Eor a particular system program, 
fluch as the PaEcal Compiler. (The new units Are h^s^tul only for 
attached block devices, such as large-volume, rigid-disk drives.) To 
use these units for a rigld-dlsk drive, you would need its devlc? 
driver and the SYSTEM. ATTACH program- 



If you use only flenlble-dtslt drives, you will not be able to 

use thesi* new units because the Apple 11 and lie have no slots 

corresponding to the new unit numbera where you could Install 
addltlorifll flexible-disk delves- 



ERROR MESSAGE: TOO MANY PROGRAM SEGMENTS 

A new error me^Hat^e appears on the screen it you attempt to run a 
program Lhat has segment mmbers larger than 31 or uses intrinsic units 
with segment numbers Larger than 31. The new error message: 

Specified code file mitst be run under the 128K Pascal system. 

In this case, the code file must be run on the Pascsl 128K system. 
Only users of an Apple lie with ai\ ^^ntenl1e^J HB-Column Tent Card are 
able to convert tfl the Pascal I28K systein with its larger available 
memory, enhanced library capabilities, and additional 32 segments. 
(See Chapter 1. ) 

CONTROL CHARACTERS NOT ECHOED TO THE SCREEN 

Pascal 1.2 will not echo or write to the screen any control characters 
typed on the keyboard eKcepr CONTROL-M or CONTROL-G. 

HAND-CONTROL BUTTONS AND THE SHIFT KEY 

You can design and run programs that test the positions of the 
Kand-control buttons and 1 (or the OPEN-APPLE and SOLID-APPLE keys on 
an Apple He), pressed by the uset In response to a prograio prompt. 
The SHIFT key may be similarly used, provided the SHiFT-key 
modification (discussed In Appendix D) Is made first. The section 
"OPEN-APPLE, SnLlD-APl'LE, and SHIFT Key Contcols" in Chapter A tella 
how to test the buttons. 
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THE CTRL-) FUNCTION 



This is a reminder, not a ne* function. Snte Ehat on an Apple Tl. a 
CONTROL-] function is achieved from the keyboard by pressing 
CONTROL'S HTFT-M , an actlaa necessary becauae the tight bracket ItBelf 
■']", is produced by pressing SHIFT-M . 



FEATURES FOR THE APPLE HE COMPUTER 



Several keyboard and control code chdn^es are iioportanf to users of 
PflHcnl 1.2 on an Apple Ilfi. Vou will want to take special note of Lhec 
if you are accustnmeil to using Pascal 1,1, 



LOWERCASE AND UPPERCASE BOTH AVAILABLE 

Lowercase characters, as well as uppercase, are directly auailable on 
Che Apple lie keyboard: uppercase characters are produced using the 
SHIFT or CAPS LOCK key, (The "SHIFT-key nodi flcat Ion" Eor u^lng the 
SHIFT key to shift between uppercase and louercase characters is not 
necessary on the Apple lie. J 



You may haue Co pteaa CAPS LOCK to tun certain applications 
programmed only Eor uppercase characters. 



FOUR CURSOR KEYS NOW AVAILABLE 

The Apple Lie has two additional cursur keys--iip and down — as well at 
the left-cursor and right-cursor keys aunilable on the Apple IT. 
Pascal 1.2 usea these keys to move the cursor if you use the correct 
MLSCINFO file- 



KEYSTROKE FUNCTIONS NOT USED 

If you have been using Pascal nn an Apple II, please nota that Pascal 
on Che He ignores several keystroke functlonE that remain in use on 
Che Apple II. When Pascal [.a Is used on an Apple He, it does not use 

• CONTRf>L-e CO shift hetween uppercase and lowercase characters 
and turn Inwerse video on; 

m COWTROL-W to force Che keyhuard Into uppercase for the next 
character typed and turn inverse video on; 

• CONTROL-R to turn Inverse video on but not change the keyboard 
froiiL uppercase; 
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CDNTROL-T to turn Inverse video off and force Che keyboard Into 
Uppereafip; 

CONTROL-^ to produce Che left bracket character; 

Other characcer translaclons produced by the SHiFT-key 
modification, where 



* 


becomes 


N 


! 




P 


1 




M 


CKTRL-e 




y 


CHTRL-"" 




" 


CflTHL-1 




1 



COKTROL-O and CONTftOL-L for up'-cucsor and down-cursor action* 



Note the warning earlier in this chapter that you might hnvs to 
change the up-cursor and down-curaor code values for Pascal 1*1 
program'! that check for these valuer, in order Co run these programs 
under Pascal 1.2. See Chapter 4 for an explanation of the changes to 
the control codes for up-corsor and down^cursor actions* 

In addition, Pascal 1,2 does not use Che DELETE key Co deleCa anyChlng, 
biiC simply Bends the ASCII EIRL character (code 7F) to Che calling 
program If requested. The urb of this key la left to Che software 
developer; For Riiggestiona* see the Apple lie Dealgn Guide lines ^ 

OPEN-APPLE, SOLID-APPLE, AND SHIFT KEYS 

You can use Che Apple lie OPEN-APPLE* SOLID-APPLE, and SHIFT keys for 
apeclal funccljn characters, for game controls, ot Eor performing 
special resec snd self-test cycles, See Chapter i, the section 
"OPRS-APPT.E , SOL ID- APPLE, and SHIFT tCey Codcrols," on how to determine 
from youc program uhen one of these keys is pressed. 

APPLE HE'S WITH FOREIGN KEYBOARDS 

If you are using Pascal on an Apple He with a foreign keyboard, 
Pascal 1.2 auC^matlcslly selects the language character set hullt Into 
your system. 

USER BREAK DURING PROGRAM EXECUTION 

iTn an Apple II?, yon interrupt" a progtaiD during execution by pressing 
CONTROL-SHIPT-Z (CONTROL-^). On an Apple H using Pascal, you 
interrupt a pragram by pressinR CTRL-SlllFT-P CCTR.L-3). The ASCII code 
for this control function ramalna Che saoie as before. 
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SPECIAL MISCtNFO FILES AND HOW TO USE THEM 



Vour APPLET: disk contains three special HISCINFD files, oa^ of which 
you should iisfl If you use a ifl-column or nn Sfl-colurTm gcreon with an 
Applf II, or a At*-cnluitn arreen with an Apple He. IE yoa fie any of 
rheee Chree canes, you can leara here how to replace the standard 
SYSTEM. rtlfiClNPO file on your APPLEfl: and APPLE I : disks with either 
the ll'l0,Mlgf:lfJ^■O, the Itftfl.MISClNFO, or the llEiB.HISCLNFO file, (tf 
you uie an B0-column screen on an Apple He, you should u^se the 
standard SYSTEM, MTSCTNFO file supplied on the APPLES*: and APPLEl; 
disl(s, ) 



The curaor-TDDve keys work o 
iDodif illation unless you use 
need to transfer a iiopy of 
disk to the APPLE0: disk, c 
disk you use — in each cane 
you plan to use Pas[:al 1,7 
HLode. you will get the h<=at 
TlAW.rtlSCINFO file or the r 
APPLE3: disk tn the APPLE«: 
startup disk you use» Tabl 
machine and ^ich MISCINFO 



n any Apple TI without HISCIMFO file 

an Bfl-colurin scceen. In this case, you 
the file 1 Iflfl.MISClNFO from the APPLR^: 
Che APPLEL: disk, and to any other startup 
changing its name to SYStEM.MISC INEO. If 
on an Apple II or an Apple tie in ^hfl-column 

reHultR by copying either the epecial 
peciaf riG40,MtSCINFn file from the 
disk, to the APPLE]; disk, and to any other 
o Z-? shows Che column -width setup for each 
file to use. 



The llAft,MISClNFn file and the HEAfl.Ml SClHFO file are identical to the 
B^-colunn MISCINFO file for the Apple Tie except that the screen width 
in the former two ia aet to 79 colunnif to ensure abbreviated Pascal 
prompt lines nn Che ''^-colurnn scteen, (A MlSClNFO file that sets the 
screen width to Bfl ci^IuTons ensured that all Pascal prompt lines appear 
In unabhteviated focm.) 

In addition, In the IIft0.MISClNKO file, the "has lower case" control 
uartable is set to False. The Il8« ,M!SCINPn file Is the same as the 
fit^-column Apple Tie MlSCINFO Eile except the values for up-cursor and 
down-cucsor lanvemenr In Che focraec ace the same as under Pascal 1*1 
(for up, CONTftOL-0, and for do-n , CONTROL-L), 
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Apple Model 



iK-colunm Feature 



Bb^-column Feature 



Apple II 


Built in when shipped. 


You must add an 00-coluiiin 
card or an external video 
tecminol with an HB-column 
option. 




Use the n4a,MlSClNFQ 


Use the 1 [B0,MlSClWFa 




file realdent on the 


file resident on Che 




APPLE!: disk of Pascal 


APPLEJ: disk of Pascal 




1.2. 


1.2, 





Apple He 


Built in when shipped. 

Dae the IIEft0.HISClWFO 
file resident on the 

API^LE 3: disk of Paacal 


You must add an 
Sfl-column card or an 
external video tenBlnal 
with an 8b?-column option. 

Use the SYSTRM. MISClWra 
file resident on the 
APPLET: and APPLE 1 : disks 
of Pascal 1.3. 





Table ?-2 , Options fat Customizing 
Screen Width 

Road on for the steps you take In ntovlng the appropriate file into 

place. 



Be sure to loodify only copies of your Pascal I'Z systetn disks, 
not the originals, which should be stored intact as backups. 
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STEPS FOR 40-C0LUMN APPLE II USERS 

Users d£ a 40-coluiiin screen vldch on an Apple II aliouid Follqw tha 
following steps: 

1. From Che PiiBcal Filer proTopt line, select the "T" or Transfer 
option, which you will, use tu copy the proper "HSCrNFO file to 
your APPLES: and APPlEl: disks. 

2. Be sure the ijrite-enable notch on your ftPPLE3: digit ig covered 
with a write-protecc tab Co protect you from accidentally 
writing over a-fid deleting any Psscfll files on that eJIeIc. With 
your APPLE0: disk in the flr&t tthe startup) drive, place your 
copy (not the original) of the Pascal \ .1 APPLE3: dislc In your 
secand drive, \l you have one, and answer the "Transfer?" 
prompt by Cyplng APPLe3 : t rAt^.MISGINFG and pcenslng Che RETURN 
key* (If you have only one disk drive, replace the sCattup 
disk in your sCacCup drive with APPLE3:, and answer the 
"Transfec?" prompt by typing APPLE3; nA0,WlSClNFU and preaalng 
the RETURN key. J 



STEPS FOR 80-C0LUMN APPLE II USERS 

Users of &^ S0-cQliimn screen ijith an Apple \\ Khou M follow the same 
steps given for A0-colu[iin Apple Tl uaets in the preceding section, 
except you should substitute the filenarae 1 18^1. HI SC INFO for the nflde 
lli«.T1ISCINF0 wherever It is used. 

STEPS FOR 40-C0LUMN APPLE HE USERS 

[Taers of Che ^fl-coluTtm ai^reen wfch an Apple lie should follow the aame 
steps given for A0-column Apple II users, ejtcept you should substitute 
Che filename llE40,MISCtNFO for Che name Il40,HiaciNFO wherever it (s 
used. 



Before taking the followlne step, be sure that the APPLEtfl: and 
APPLEl: disks ta which ynu are copying do noC have a tab 
covering their i^iCe-protect notches. 



3- Then t"o-dr[ve users should answer the "To where?" prompt by 
Cyplng APPLEt»:SYSTEM.HISCrNFO and pressing the RETURN key, 
assuinlng chat tho APPLEfl: disk is in place in the startup 
drive. £One-drive users should ElraC replace APPLiE3: wl Ch 
APPLE0; in the startup drive and then answer the "To where?" 
prompt by typing APPLKfl:SYSTRH.MISCINFC} and pressing the RETURN 
key. iJhen che system pcompCs for the "destination" disk, press 
Che SPACE bar aa indicated,) Now Che aysCeTu asks if It should 
delete the original SYSTEM, HISC INFO before copying. Type "¥" 
for "Yes" in response, because you want to replace thac file 
with the lUfl,MtSCINFO file. 

A. Both two-drive and nne-drlue users should repeat the above 

procedure to copy the ll40.MiSCINFO file again, Chla time fcon 
APPLE3: CO APPLEU . 

5. If you have ather statCup disks you use regularly with the 

ifl-column screen width, you can replace their SYSTEM. Ml SC INFO 
file with the 1140. MlSC INFO file by uatng Che Bane aCepa just 
presented. 
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AL 128K SYSTEM 




THE KXTBKOED BfMiQLUMN TEXT CARD 
HAKINC a UflK S-^STEM STARTUP DISK 
laaK USKR rWROW WESaAUKS 
SYSTEM Ur*K SY.ITEM KEMOHY QAfiANUATIOP 

Mflnaglns AimlKflry Heaory 

ADDITIONAL iJEUMt/n^ 

HOW TO (rSK THE NFM LIBRAHIES 

CothparLng l.tbrarlen UnUtir tlic b'lK fltirt l^8K Sy«teiii>i 

WBklftK » Inlfcriry WJmc File 

Uftlntf tbtr Library >/dD« Flic 

Using Ono Mbcjity File Ulth Two PtDgraaE 
Uxing SflvntAl Library Files Wlib One Prci^EdH 

UtlDB tho Percent Prefix In a Mbuiv Nane File 

How the Syat«i Searcbfl* Libraries 
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IE you are afllng an Apple He EKteoded a0-Column Text Card, you may 
fUHComize a startup or "boot" disk that will give you norp usable 
memory in addi:ion Co the built-in ft4H of RAM In cKe Apple He. This 
iB poagible because Che ExtendeiJ BS-Colunni Text Card prouliisE: fe4K of 
auxiliary RAM— for a total of l2fiK with the catd on an Apple Tie, The 
Pascal 1,2 aof^wflre contains special l^SK versloris cif the fileH 
SYSTEM, APPLK a^d SVSTEM. PASCAL that you can use inntead of the standard 
6iK. veralon!! of both. 



THE EXTENDED 80C01UMN TEXT CARD 



The Pascal 128-: Eystein enablKH you to use the eitCta memory provided by 
the Extended Si-Column Text Card. It thcreEore ^Ives you mre apace 
for your program code and data. The LZSK Pascal System 

• Allows up Co A6K of cDiopll^d P-code storage ^pacc on Che 
Extended 8fl-Colur<rn TexC Card; 

• AllovG up to 41K for data and aaaembly-code storage in the 
Apple He's main meraary, bei^auae P'-code Is stored on Che Card: 

• Allovs tii^ segments Instead of the i^Candard 32 segnientsL 

■ Provided enhancad Hbrary capablH CEeB . Including libraries 
that can be shared by Cwo or laore programs; 

• Can be used Co edlC files up Co 53 blockH ta length, compared 
ulth the standard 3i-block files; 

• Provides Compiler symbol-table space of 18,719 words, compared 
to Che iJlL uorda available using the Pascal 6ftK gystem; 

• Provides Assembler symbol-Cable space of 1S,A87 words, compared 
to the B,317 words available using Che Pascal GiK system; 

» Esecutes Pascal programs developed on Che Paacai 1.2 fi4K 
flyatem; 
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Executes PaficaL 1.1 prograniH, provldinj; the pros^a^a la 
othertfiae conpatlble with Pascal 1.2 chardt»EiBtlcB; 

»aa a processing speed virtually as fauC as that of the fe'iK 
aysteiQ and reduces dependence nn the slow swapping nerrhoda 
often used to make more system memory available to gragramo. 



MAKING A 128K SYSTEM STARTUP DISK 



To put the IZSK Paaral S/aten an your Apple He, you create a new 
startup disk by copylne two Pascal 1,2 gystem files to a newly 
farmatted dial?, according Co the Followinft instructions. 



Dd not create a 128K startup disk, unless vou will be ualng the 
Apple lie ExCended efl-Column Te^t Card. The new startup dlalt 
will not work on a 6AK Apple He. 



Scare up your Pascal 1.2 system and then format a new disk, if 
you do not already haue a supply of Pascal-fonnfltted disks, 
tising the Formatter program as explained in Chaptec S of the 
Apple Pascal Operating Sygtem Reference Manual . If your system 
has two disk drives, the newly formatted disk should be in the 
second drive (unit ^5:) during the next few steps. One-drive 
users should not yet insert the newly formatted disk in Ehelr 
drive. 

Nest, from the Paacal Filer prompt line, select the "T," or 
Transfer option, which you will use to copy the special LZflK 
files to your new startup diak. Now remove your system disk 
Eroni the startup drive (unit ffi:). 

Before proceeding, check to he sure the write^enable notch on 
your APPLET: disk Is covered with a tab to prevent accidentally 
overwriting a system fUe. Now place your APPLO; disk In your 
startup drive (unit ff4:) and answer the "Transfer?" prompt by 
typing APPLE3M2ft«. APPLE and pressing the RETURN key. 
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Note that in the next step, you change the name of the file 
from 12JiK. APPLE to SYSTEM. APPLE as you copy It to the new 
startup disk. For the location of the file, you may give the 
unit device number (l^^ or i^^i as shown) or the volume name of 
your nevly formatted disk. 



4- Two— dri."B« users should now answer the "To where?" pronipt by 
typing #5;SYSTEM. APPLE, and pressing the RETURN key, assuming 
that your newly formatteil startup disk is already in the second 
drive. (One-drtvB uaers should first replace APFLEI: with Che 
newly formatted disk In the drive and then answer the "To 
vhere?" prompt by typing fli iSYSTKH. APPLE and pressing the 
RETURN key. When the system prompts for the "destlDatlon*' 
diak| you press the SPACE bar as indicated,) 

5. Both two-drive and one-drive users now repeat the preceding 

procedure to copy the HBK. PASCAL file Ecom APPLE3: to the new 

startup disk, changing Che name of the file as you do so from 
IZSK. PASCAL to SYSTEM. PASCAL. 

G- Again using the Transfer procedure, copy the file 

SYSTEM. MISCINFO from your APPLF-0: or APPLEl: disk to the new 
startup disk, end copy any other files that your Pascal startup 
disk reqiiirea, such as SYSTEM. LI BRARY. 

7. Finally, make a backup copy of this new disk following the 

dlrectior.s for copying an entire disk given in Chapter 3 of the 
Apj>le Faecal Operating System Reference Manual. 



If you try to use the 6AK SYSTEM. APPLE file and the I29K SYSTEM. PASCAL 
file (or vice versa) on the same startup disk, your computer system 
will either "hang" (not start upl or continually restart {"reboot"). 
In either case, you will not be able to use Pascal until the file ralxup 
is corrected. (This la one reason you should modify a copy of your 
startup disk, rather than the original,) 

Your new I ZSK Pascal startup disk is now ready to use. You can use 
your LZBK system all the time: you need not shift back and forth 
between the 128K and the 6^K systems. sLthough you may do so by using a 
startup disk with the original 64K versions of SYSTEM. APPLE and 
SYSTEM. PASCAL. <The 6iK system will work on a tJBK Apple lie, but will 
Ignore the eittra memory,) 
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128K SYSTEM USER ERROR MESSAGES 



Ydu raight QncDuntec ons or more of these error vesBageE vhen using the 
1.28R syatem: 

■ If you Cry to start up youc cusTiDniizsd I2SK. disk, on an 

Apple Up without Che Extended Sfl-GoluTDn Text Card, the oieseage 

Extended fliJ-Colunin Card required 

Ebonies up on your Rureent and the syateai gCops, At this pnlnt, 
you will havE to restart the Hyaten using a b^K startup dtsk 
(puch as APPLEIt, or, in the case of a two-stage startup^ first 
APPLE3: and then APPLE0:). 

• If code overflows the available space In Che RAM of the 
Extended J^^-Column TexC Card, Che execution error message 

Codespace overflow {if the aysteia disk la on line} 

or Exec Ecror # 16 

cones up on your screen. You muBt restart the Pascal eyGtem by 
prea^ing COHTHOL-HK^ET. 

■ If a running program asks for a neur segEnecit but there Is less 
Chan one block of available stack space, the sKecutlon error 
message 



Stack overt low 
Exec Error H 



[if the system disk is on line} 



coEnes up on your screen. You must restact the Pascal system by 
pressing CONTROL-RHSET. 
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128K SYSTEM MEMORY ORGANIZATION 



So far you have learned how to make a special startup disk In order to 
uae the Pascal 12&K syBCera on an Apple He with an Extended Bfl-Column 
Text Card, Here you will learn the differences between Che ways the 
fiiK and I28k Paacal syatema organize memory. 

The memnry organisation of a 6^K. Pascal sygtem on an Apple U with an 
Apple Language Card Is Che same ^s that on the Apple He, which has the 
16K RAM of Che language card built into its hardware. Both of these 
6iK systems use corresponding gectlonq of raeraary for the same 
funcClonSt aa you see in Figure 3-1, 



Numbers in figures and text In chls nanufll Cbat are preceded by 
a dollar sign CS) refer Co the hexadecimal number KyaCem used 
in aaseoibly languaEe to refer Co sddreRSSR in memory. This 
bBBe-tfi system uses che ten dibits B throuRh 9 and the six 
letters A through F to represent values from ChrouRh 15, 

The 12flK Pascal systejn and the 6AK Paacal systems organic? memory in 
different ways, as you can see by comparing Figures 3-1 and 3-2. 

Tou will find a more detailed memory nap of the Pascal 64K system In 
Appendix B of the Apple Pascal Operating System Reference Manual , 
For maps and explanations of the auxiliary memory of the Extended 
flB-Column Text Card, see the Apple He Reference Manual , Chapter li ^ 
and Che Apple He F-xtended Sg-Column Text Card Supplement , Chapter 2, 
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MEMORY ORGANIZATION FEATURES 

Th^Bo ate [he most ImparL^nt feattirea of Che I7SK. Paacal Sys[t>n'Q 
iQEinDry arganlEatlpn : 

• The butlC-ln 6iK. of RAM C Che "nflln niEniory") scores only 
dusembly code and daCii, 

• All P-code is stored In Che "auxiliary meiDory" space an Che 

Ejttended efl-Coluinn Text Card, 

• Because It Is urlcten In P-code, the Pascal operaClng ayaCem 
has been moued to the aantliary necury of the card, 

• Because they are wrlctea In P-code, che Pascal austem 
componenCfl (Filer, Compiler, Editor, and no forth) are scored 
in the auxiliary meoK>ry of the card when they are hetng 
enecuted. 

• The seccion of RAH on the Extended S0-CoLu(iin Text C^rd chat 
corresponds Co the "lan^u^ge card" scccion In the 64K system is 
not pireaentiy dedJcaCed to a particular funccton, but is 
reaerved by Apple GonpuC«r, Inc. for future syatein development. 

• The IZftK Pascal ayateiB has enough apace to hnld Che entire 
Compiler in memory during a compilation. For this reason, it 
Is not necessary to use [he {SS+) option when compiling a untc 

declarattan under che HBK system. 

These features provide more room to store P-code hecauae It doean't 
have to share memory with assembly code and data. In addition, there 
is more room for ussembly code and dat;^ in main memory because no 
P-code 1b scored there. 

Because data and P-code are stored in different sections of memory, 
nsinp the swapping feature of either the system or the Compiler will 
not add to the space available for data, but will add to the space 
available for P-code. 

MANAGING AUXILIARY MEMORY 

The Pascal laSK BVBten uaea cwo lero^page vatEablea co manage? uae of 
Che auxiliary mamory on the Entended BB-Coluran Teic Card. CODEP polnci 
Cn the loueat uBed ward In the auxiliary memory 5pace. CODELOW 
contains Che lowear pennlflalble value for CODEP; C0Dlt;LOW d^faulca 
to SSe^, Table 3-1 deacrlbea these varlahleg. 
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Zero-Page 
Location Pointer 



H9 CODEP 



$62 CaCKLOW 



De script ion 



PermlHsible 
Range a 



Paints to lovESt used word In Sfl(J?J-SC000 
the contiguous ASK of extended 
RAM space. 



Contains the lowest permlssahle 
value for CODEP. Memory below 
Chia point Is reserved. 



>fusc noL be 
below $800 
(default value) 
or above $C^0^. 



Table 3-1 , Pointers for the Paacal 
U8K System (Hexadecimal Valuta) 

Because CODEP points to the lowest word In the auxiliary memory space. 
It begins wich che value of $0^29 and warka down until it hits che 
vfllue CODELOW. 

Vour program can eKamlne CODEP and COOELOW if ic needs to. If your 
program runs under the I28K system^ U cannot change CODEP. but it can 
change CODELOW if It bIII use part of the aincillary memory. For 
esainple, to execute a program that uses the 560-dot high-resolution 
screen, you would change CODELOW to 54000 and then change It hack to 
its original value after the program has run. 

If yon are using the fi^K system on a machine id Ch the Extended 
aO^CoIumn Text Card, you can use CODEP aa a aero-page pointer to the 
auxiliary memory space on the card. This feature is uaePul If you are 
managing this space yourself, rather than ueini^ the Pascal l2eK syEtem 

to manage It. 

Here are several Important reminders about your upe of theae varlahles- 

1. You must ise even numbers when giving valucK to Cheap vnrlahles 
because chey point Co words, noc bytes. 

Z. The sysceii doea not restore CODELOW or CODEP to their original 
values afrier execuring your program. Whenever you have changed 
one of theae variables, be sure to ptic the value hack to what 
It was before your program ends. 

3. If your program runs under the I2SK system. It can change only 
CODELOW; CODEP Is changed only by the Pascal system. 
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ADDITIONAL SEGMENTS 



The 12BK system allows 6^ segnennB, whi^reaa the fi'-K s/sten allows 
only 12p This maltes it easier to break up a large program into 
manageable parts. Nevertheless, vou can have only 16 SPj^mentFi In a 
CDdeflls, BO that. Cheae eKtra segmeiLts will be useful aalnly as 
IntrlnHic unltfl. 

The Compiler, Ehe Llnktr, LIBRARY. CODE, and LlBHAP^ConH; noj allow b^ 
segmeutH, numbet^d fl throup^h 63, regardless of which Pascal system (f^UV. 
ot 128K) they are running under. Roirever, If you try tq run a program 
with a segment number greater tban 3t under the bUV. ayst^n. you will 
get 3n error, tn other words, you can use the fi^K system to develop 
prograiQ-1 that will only nm under the 12BK aystera. 



S^gmenta SB through 63 are reserved for use by the Paacal 
system. They should not be used by an application. 




HOW TO USE THE NEW LIBRARIES 



Thla section discusses Che extended library file options avallahle only 
with the Pascsl I2BK system, shows hour to use these options, and also 
shows how prograTiE may share the same library Flies. To help you 
choose your approach to library files as you develop prograiss , there is 
a section llscing the sequence of steps followed by Che systen] as It 
searches llhrary files for the intrinsic units required by a program at 
execucion time. 

IMPORTANT DEFINITIONS 

The library file features available with the 6AK eyBtem remain 
imchanged. Tlie PaiCAl I73K sv^tem^ however, has increased the niiiciher 
and nanageabi llty of library flies tbat you may haue for a pto^^ram. Iti 
Chla discussion of the new library featutes, vou will encounter the 
phrase "in the same volunie as." This phraae means thaf a file must 
have Che same volume name or unit tiumbet as anocher flla. 
Lik-ewise. the phrase "In a different volume ftoip" meAns that the volume 
name or unit nuHiber of one file Ip different frooi Chat of another 
file. You will fllGO encounter Che phrane "file pathname." * file 
pathname is the unlume name of the disk, or Che untc number of Che 
dlfllc drive, followed by the name of a particular file that resides In 
the volume. The pathname is the path the system must take to find a 
(liven file. See Figure 3-3. 
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Figure 3-3 . The File Pathname 



The volume nams 1b vhateuer narne you have given to a particular 
flexible disk., like HYFILE:, and the unit number is f^: , ^3:, or 
fr9:_.ff2(Ji. The filename Is Che name of a file In that disk volume, 
normally Including the file-type sufflK, like ADDUP.TKXT, ADDUP,CODE, 
or LIBI .LJU. 



In this set of fllea, 

MYFILE: 
LIBl.Ltft 

Liaz,LiB 



{a volume name I 
la library fllef 
(a library file} 



the same volume name or unit number heads the file pathname for Che two 
library files 



MYFlLEiLIBl.LIB 
T1YFILE:LIHZ.LIB 



1 or written afl ) 
{ or written as I 



#5:LIHULtB 
iP^iUBa.LlB 



Notice that In this set of flies, 



NfiWJ^ORT! 
NtU.LlH 
SYS TEW. LI a 



{a volume n'^me} 
U library file} 
{a library file} 



the file pathname for theae two other library fllee Is different from 
the file pathname for LlBl.T.IB and LIBZ.LIB: 

WKWSOHT:NRH.LTB Is a different pathname ftoir MYF1LE:LU1 . LI B. 

And so we any that NEW, LIB Ie "in a different volume from" l.IBl.LIB or 
LIB?. LIB, Later In this discussion^ you will learn how library files 
In different volumes can be used by a proj^ram that Is executing. 

\i\ underF:!:andi[ig of Pascal llbrarlee depends on a clear conception of a 
few other basic terms used frequently In this discussion, nuch as 
"executable code file, " "intrinsic unit,"' and "library file," 

An "executable code file" In a file in which all the necessary 
cnmponentg are In place: regular units or assembly language cnd<- (ur 
both) have been linked, and any required Intrinsic units are available 
In the appropriate library files. An enecutable code file or a Pascal 
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library file nay be composed of dlffercTiC coniblnar Ions of compiled and 
aaaenbl^d Bource ptggrams. 

La this dlscuBGian, ve refer montly to "intrlnBic units," occaplonally 
to "regular iinita." Regular unlEs, by definition, have to be linked 
with, and thereby ineerted In, the executable code file pttor to 
pcogrfltn execution. lntrlnnlc units, on the other hand, are connected 
by the Byatern to the executable code file at program execution t li&e . 
Intrinsic units have t\jo characteristics that are relevant to chlR 
dlHcuaalon; first, they are not restricted to use by only one 
executable code file; and, second, they must he placed in a library 
accessible to the ayatem at pfDgcam execution time in order to be utied 
by the executable code file. 

A "library file" la a code file that is not directly executed. 
Instead, a library ftle contains one or more compiled intrinsic units 
used by one or more progr^nns, \ USES declaration In the ptogran names 
the requited unit, which is connected hy Che gystenf at prosr^n 
execution time. Another section of this chapter will explain how the 
system searches various library files Eor the Intrinsic units required 
by a particular program. 

Two or more library files can be combined into one, using a new name or 
one of the old names, and units can be moved from one llbrarv to 
another. You may alno move units in and out of a copy of the 
STSTEH,MBHAR¥ file that came with your Pascal system. (Chapter S of 
the Apple ?aacal Operating System Reference Manual explains how to 
combine or move library files with the LIBRARY utility program.) The 
name you gWe a library file depends on the kind of library file you 
are using and on its purpose. In general^ the aufflic .LIB is used to 
complete the filename. 



COMPARING LIBRARIES UNDER THE 64K 
AND 128K SYSTEMS 

Note the differences between the library file system supported by the 
Pascal 64K system and that supported by the Pascal 128K system. For 
fltoting units, the &Aj: system allows only one library file for each 
executable program: SYSTEM. LIBRARY. The Pascal l^BJC system supports 
SYS TKrt, LIBRARY, hut also additional libraries called "prograni 
llbrnriea." 

"SYSTEM. LIBRARY" is a library file that muGC reside on the system or 
startup disk In order to be used. It may contain units supplied by 
Apple Computer, inc. — the unit called APPLESTUFF, for example — and, it 
you so choose, additional kjrits that you youtself place in 

SYSTEM, Li HRARV nclng the LIBRARY utility pro^rara. 
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A "Program Library File" is a library file that has the same volume name 
or volume unit number (is "In the same volume as") the executable code 
file and Is given the saiM name as the executable code file except that 
its suffix is .LIB rather than .CODE. For example. If an executable 
code file has this file pathname: 

KAIL: SORT. CODE 

then the correapondlng Program Library File «lll have this designation! 

MAIL: SORT, LIB 

A Program Library File, like SYSTEM. LIBRARY , may hold one to sixteen 
unit aegnenta. Only one Program Library File may be used by a program, 
although the SYSTEM, LIBRARY file may also be used by the program. 

In contrast to the 6AK Eysteni, the I23K system alLovs up to aix library 
files (including SYSTEM. LIPRARY) with each executable code file . and 
also allows multiple programs to share llbrarv files. This extension 
of Pascal libraries lf> loadp possible by means of a new kind of file, 
called a "Library Name File/* 

A "Library Name File" Is a text file you create that contains a list of 
pathnames of up to five library files that contain Intrinsic units you 
want an executable code file to use. As long as Its pathname is 
correctly given, a library file listed In a Library Name File can be In 
any volume on line at the start of program execution. The Library Nan* 
rile uses the same naming convention as a Program Library File: vou 
give It the name of the executable code file, using ,LIB as the suffix. 
(The Bpecific format for a Library Name File is described in the next 
section of this chapter.) 



Note that If you decide to use a Library Name File, vou cannot 
then use a Program Library File because they both would have 
the same name. 



By listing library file pathnames in a Library Name File, you direct 
the system at the start of execution time to search the files with 
these pathnames to find any Intrinsic units needed by the executable 
code file. Later In this chapter, you will see how library files In 
the sarae volume ae the execiitable code file or In another volume can be 
listed in a Library Name File and how they can be shared by mote than 
one program. 

For an execucable code file requiring only a few units» you will find 
that a Program Library File will take care of your library file needs. 
For a larger and more complex ripplication — one using a large number of 
Intrinsic units— you should use instead a Library Name File. Using a 
Program Library File limits you to units residing In the B,ime volume as 
the executing program. SYSTEM, LIBRARY also has a limited utility for 
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large appltcatlnns: It wust refllde on Che syatem disk, where tc taken 
up valuable apace, purChenoore, because you may use a different 
SYSTEM, LIBRARY In different applications — one you have tailored to fit 
particular needs — you face the poCentlal conflict of library units 
having the aaiae name ot the same segment number. 

These are Che advantages of ualng Library Name Files for your 
application programs: 

• Up CO sin library files (including SYSTEM. L1BR.ARV) CflTi be made 
available to an eKecutable proi^ram. As before, each library 
file can hold up to 16 unit Hegraents, although the maiiiiQua 
number of segments allowed is d^. 

• A library file can be shared by two or more esecuCable programs 
by llBCing It In separate Library Name Files for each of Che 
executable programsi 

• Pisk space can be conserved by having only one copy of the same 
intrlnalc unit shared between programs. 

Table 3-2 comparea the kinds oE library aptlona available under the 64R 
system with thoiie auallable under Che l2flK system. 
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Si 

± 



6AK System 



12BK Bysceia 



Allows one library on line 
pet program! 



SYSTEM. LIBRARY 

Must be on syscem disk. 
Keeps its own name 
Files can be shared 
Limit: only one on line 



Allows up to siK libraries 
on line pec program; 

PROGRAM LIBRARY PILE 
Same voluioe as program 
Takes name of executable 

code file and adds .LIB 
Files cannot he shared 
Limit: one per program 

or replace PLF with a 

LIBRAFV NAME PILE 

Sane volume as program 
Takes name of executable 

code file and adds .LIB 
Facilitates library file 

sharing 
Limit: one per program 
Lists pathnames of up to 
5 library filea 

LIBRARY FILES 

Up to 5 usable by a program 

Any name 

Can be shared by programH 

SYSTEM. LIBRARY 

Must be on system disk 
Keeps Its own name 

Files can be shared 
Limit: only one on line 



Table 3-2 . Pascal Library Options: 
6^K and 128K SyHtems 



For Information on arranging Intrinsic onlts in libraries. 
see Chapter 5 in the Apple Pascal Language Beference Manual 



MAKING A LIBRARY NAME FILE 

A Library Name File is a te^iC file Chat must conform to a specific 
text format. 

To make a Library Name File, begin a new file In the Pascal Editor. 
Ulthout leaving" the Editor, type "1" to select the Insert option, and 
make a Elle ualng the Eolloulng format On the left, which ia illustrated 



MOWTO USE THE NEW LIBR/V?IES ^ 



hy Che exanpl? on Che right: 

LIBRARY F1LES:[R£TURN| 
<pflClinai!ie>|RETUKN) 
<pathname>l RETURN i 

<paChname>iFtETirRKl 
<p3thname>|RETURN| 

<pathnaiiie>|RETURTJ| 
SSI RETURN] 
icOhJTROL-Cl 



LISRARV FILES: 
»ftlL: PREP, LIB 
MAIL: FTN- LIB 

MAIL:LIB1-LIB 
MAIL?LIB2-LIB 
MAILTLIB3-C0DE 
3$ 



Che 

paChriamei 
of five 
library 
files 



Nott^a: 



1, 



1. 



The "L" In "LIBRARY" muat be Che first characCer on Che flrsC 
Line tn Che file. You cannot have anf blank lines, apacen. or 
ocher characters at the cop oE the file or between lines. The 
string "LIBRARY FILRS:" may be In uppercase or lowercase. 
Press the RETURN key after each line, as shown, 

flelQu Che name "LIBRARY FILES:" and also beginning ac Che left 
margin, Cype on separaCe lines Che paChnarnes (fallowed eE^ch 
tinte by RETURN) far each file you wane to designate as a 
library file. You can have flue pathnames or fewer In yaar 
file. The GysCem will Ignore anv pachnanes Llsced afcer the 
fifth one. 



3. IVo dallar sl^na ($$) make up the laac line of the file no 
□tatter haw many pathnames yoii use. 

4» Press CONTROL-C to leave Insert Tnode. 

After you've made your Library T^ame File and checlced the formflC 
carefully, you can type "0". then "H", to Urlce It from the Editor to 
your pTo^Fsm disk, giving IC Che name of the executable code file, but 
with the .LIB fiufftit, luch ae UPDATF^.LIB. The following paragraphs 
tell you in more detull how C» select ami arrange library files, 
Including those to be shared by iising the Library Name Files. 



USING THE LIBRARY NAME FILE 

This section gives several exanples of how to use library files with 
the Library Name File, 



Using One Library With Two Programs 

Suppose you have wcircen two flhort appllcatlor^s, called SORT and 
UPDATR, each one stored tn a Bepjrtate valuniE or on a separate flexible 
disk. Each haa Co haue a sec of Intrinsic units on Line when being 
eitecuiLad. Right now the Intrinsic units are stored In the ilbiaiy file 
named MEP.LIS In the sane volume (MAIL;) as UPDATE; 






s 



K 



3 
3 



"3 

3 
-a 

■a 



MAIL: 

update. code 
phep.l:s 



{b volume} 

{an executable program) 

{a library file} 



If you vanted either oae of the applications to be able to use the 
Intrinsic units contained in PREF.LIB, you would flraC have to list the 
pachtiame of PREP. LIB in a Library Name Pile In the aasnciated volume, 
as shown here : 



HAILi 

UPDATE. CODE 
PREP. LIB 
UPDATR.LIB 



{a volume} 

Ean eKccutable ptograa} 

[fl library file} 

{r Library Name File . 



LIBRARY FILES 
MAIL: PREP. LIB 



SS 



NnCe thac the Library Name File taken the same name (except for the 
Hufflx) SB the executable cade file for Che program (UPDATE) that Jses 
It. Also note chat for both programs To ahare Che same library 
file — In Chlfl cafle PREP. LIB — you do not need to place PREP.LlH Itself 
In both volumes. Instead, you leave the file In the volume HAIL: and 
llgc ICB pathname in a Library Vamc File In the other volume, UTlLS: 



UtTLS; 

SORT, CODE 
SORT. LIB 



[a volume) 

[an executable program} 

\& Library Name File . 



LIBRARY FILES; 
MAIL: PREP, LI a 



ss 



Now PREP. LIB Is a shared library file, Its intrlnslcs usable by both 
programs even Chough Ic resides In only one of the two volumes. Of 
course^ the volume MAIL: must be on line when the program SORT is 
executed so that SORT nay have access to Cihe library file PRRP.LIB, 

Using Several Ubrory Files With One Program 

If yau have a number of library files In the Bame volume as the 
executing program where, for example, the program SEARCH. CODE has the 
pathname REPORT: SEARCR. CODE, your Library Name File (with the pathname 
REPORTrSEARCK. LIB) would contain 



LIBRARY FILES 1 
REPORT:LlBl.LIB 
REPORT: LTBZ.LIB 
REPORT: LIB 2. CODE 
SS 



the pathn^nea 

of three 
library files 



LIBI.LIB, LIB2.LrB. and LIB5.C0UE are sample names for library files 
(Ydu may use any name for a file containing lil>rary units, as we did 
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for LIB3,C0DG, alchougli uaine the suffix -LIB makes tt easier cq 
renenbET that It In a library of units.) 

Vou could 3ttipllfy the wriclng of a Llhrary Narae File by sPtCtng Che 
Pascal preflif to thp name of the tfolurae you are cucrencly uaing. For 
exaiDple. if, oHing Che Filer, you set the PaECdl prefix to the volurao 
name, HEPORT:, oc, aay^ #9;, hpfore executing SEARCH. CODE, you could 
write the Library Kaine File more aimply, like thla: 



LIBRARY FILF.3: 
LIHI.LIH 

LTS2.LIB 

LIB^.CODE 

SS 



the filenanea 

of three 
library fiLea 



The syateia will attach the prefiit to a library fiLenane before 
openlns that file. {To aeC the Pascal prefix from the Pascal 
Filer, see Chapter 3 of the Apple Paacal Operating System Reference 
Kanual. ) 



tf you use the Paacal prefix In conjunction wi 
Hated In the Library Name File, you must make 
aet to produce the correct pathnameE no Chat t 
library files when ir is executing. If you an 
programa in different tfolumea, or programs wit 
different volumes, you will need to change the 
executing each program to ensuro that the path 
library are correct at execution time, Vou na 
rel/ on setting the prefix during prograin deve 
probably not ask a user to set the prefix befo 
pcogran. A more foolproof way would be to use 
before each filename, as explained in the next 



th the set of filenames 

sure that the prefix in 
he prograio can find its 
cceaslvely execute 
h library files in 

Paacal preflit before 
names for the shared 
y find it convenient to 
lopraentt but you would 
re running an application 

the percent prefix 

section. 



A program on one volume can use library files on a different volume. 
For example, say that you want to use two of Che library files In the 
volume REPnET: for a program called POST.CODK in a second volumei 
ACCOIJNTS:^ without phyElcally moving those two flies from the original 
volume (REPORTr). You can do Chle easily by listing the library files 
needed by POST. CODE In a separate Library Nanie File called P0ST.L1B» to 
be inserted in the second volume (ACCOUNTS:), ualn(( the full pathname 
Co the original volume (REPORT:), as tn Chts example, or using the 
filename and setting the Pascal prefix to REPORTi before running the 
program, as in the previous section. 



ACCOUNTS : 
POST, CODE 
POST. LIB 



{a voliiine] 

(an executable program} 

{& Library Name File . 



LIPRARY FILES: 
REPORT: LIB 1. LIB 
REPORTiLiaa.LIR 
3$ 



Note that the library file? LIBl.LIB and LIB2.LIB, physically located 
In Che first volome (REPORTS:), are shared by both prof^rams CSEARCH and 
POST) bur that LIB3.C0DE Is not shared because its pathname Is not 
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T|. 



listed in the Library Name FMe in the second volume (ACCOUNTS:). Had 
it been listed in the Library Name File POST. LIB, then It too would 
have become a shared library, usable ae well by the program POST. CODE, 
even though the actual library file «aB physically located In the 
volume of the program SEARCH, CODE along with the other tSJO library 
files. 

Many possible arrangementa of library files are supported by the Pascal 
128K system, using different combinations of volumes, programs, files, 
and disk drives. The e:<amples Just mentioned are simply hints Co help 
you get started in developing your own shared libraries. As you can 
see, you will vant to give considerable thought to the overall 
structure of your application and to the number of disk drive"! you 
presently have on line. In particular, you will wane to plan the kind 
of library files appropriate to each program, the files you will 
designate as shared libraries, and the best arrangement on disk of all 
Che files for i particular application proifram. The section "Horf the 
Syatem SearchsE Libraries," later tn this chapter, gives a brief 
description of how libraries are searched for the Intrinsic code units 
required by the executing program. 



K i USING THE PERCENT PREFIX IN A LIBRARY NAME FILE 

The percent prefix, discuased In ChapCer 2, can be uaed to make a 
Library Naine File independent of its volume name. Because the percent 
prefix is set to the volume name of the executing code file as soon as 
that file has leen found, you can use the percent prefix in the Library 
Name File to replace the volume names of the listed library files. IE 
you had this s?t of files: 



B ; a 



-^ 





s ^ 



MYFlLE: 
MIK.COIE 

MIX. LIB 
OLD, LIB 
EfEW.LIB 



{a volume] 

fan executable prograni 

(a Library Name File} 

la library file] 

{a library file} 



and wanted to jse Che percent prefix, Che conCents of the Library 
Name File for MIX. CODE, which is MIX. LIB, vould be 

LIBRARY FILES: 
lOLD.LTB 

INEW,LIB 

Then when you execute MYPlLR:HIX»CODE, the syaCen sets the prefix Co 
HYFILE:, opens up Che Library Name File MU.LIB, and reads the 
pathnames for [he two library files OLD.LlfS and NEW. LIB. In thta caae 
Che system expiindp the paChnames like ChLa : 



lOLD.LlB 
:SNEW.LIH 



> 

> 



M¥FILK;OLD.LIB 
M¥F1LR:NEW,L1B 



HOW TO USE THE NEW LIBRARIES 49 



Tha "r' BCflndfl for the wolume name, MYFTLEi , of the proacain MIX, CODE. 



Keep in ralnd when developing nn application that the grouping 
of celaced prograuis and their Ubrarlee tosecher In the qame 
volume facHlLateq tht use of the percent prefljc to specify 
library files. 




The Eystem Bearches £or the Intrlnaic units uncll it flndR all of Chen 
or until It runs out of library files and gi^es an error aeeaage. If 
It finds the units hefuce it has looked In all the relevant llhrary 
files, IC stopn aearching and begins executing the progrfln. 



¥: 3 



HOW THE SYSTEM SEARCHES LIBRARIES 

The following atep-by-step description wlli help you choose the library 
file approach beat suited to the particular application you are 
developing. 

Uhen H program is execuced, the syatein first exanlnea It to determine 
whether or not ic uses any intrinsfc units. If It does not, Che 
pro^rani ia loaded and run. If it does, the -systeiD looks at the 
different types of library files, in the follorftng order, to find the 
required units: 

1. Program Library Tile 

2. Library Name File 

1. Library flle^ whose pathnaneB are Hated in a Library Name File 

A, SYSTEM. LIBRARV 

The syscem first looks for a file of the same name as Che executing 
program but with the suffix changed from .CODE to .LIB. Then It triea 
to open the file corresponding to its new name ( progname. LIBJ . If Che 
file exLstE, the system determlnea whether It Is a code file or a text 
file, tf It finda a code file (the fUe ue call a Program Library 
File), Che system looks In the file for the required Intrinsic imlts. 
If It linda in&tead a text file (the file we call a Library Name File), 
the system collects the pathnames of the library files Listed there, 
and Chen looks In those files for Che required Intrinsic units. 

If you have set a prefix and the names of the fllea listed In the 
Library Name File require a preflic, the syHtem attaches the prefix 
before searching for the files* 

If there are Intrinsic untta needed that have not been found in a 
Program Library File or by means of a Library Narae Flle^ or if your 
program has not used either of these libraries at all, the system looks 
in SYSTEM. LIBRARY. If the missing unlta are not found in 
SYSTEM. LIBRARY, or If SYSTEM- LI JiRAWY U noC on the syatem disk, an 
error message appears on the screen, and Che system Tetums control Co 
Che Foacal cooimand Line. 



M'. a 



m 
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CHAPTER 4 

TIPS FOR PROGRAMMERS 



Thefle noteg on more cechnlcfll aspeccs of PhhchI l.Z vill he of Interest 
to prog cflinne 1:9 In general and Co apfillcfltton devalopere In particular. 



A NEW SWAPPING PROCEDURE FOR PROGRAMS 

Apple PflHoal provides Suapplng ciptlons at the Hystem command level and 
at the program level that allow you to maxiDilze Che amount of memory 
avaLlahl« for ptogran usp. (For how Ciheae opCionE are used at the 
systeni level, see the Rection "More Meniory With a New Swapping Option" 
In Chapter 2 of this manual.) Und^r Pnacal Kl, only one level of 
flwapptng could be turned on from a program to ensure more meinory apace 
for a program ahout to be chained to and ejtecuted. You used it "by 
calling the built-in procedures SWAPON and SWAPOFF found Irs the 
CHAINSTUFF unit of SYSTEM- LlBEtARY . 

Pascal 1.2 Includes SUAPON and SWAPOFF plus a new butlt-lci swapping 
procedure, SWAPGPDN , llkeulQe residing in Che CHAlNSTUFF urilt, Vou can 
use thlB additional level of swapping when i^halnlng to progratns that 
require -n^re ntemory than provided by SUAPON. SWAPGPON provides 
appcoRimately 80*1 more bytea of available memory than SWAPON, Like 
StfAPON, SWAPGPDN Ih called from a program JUGt before IC cermlnates, in 
order to cum swapping on aC Chls new level for che nexC program to be 
chained to, SWAPOFF will turn off all swapping as In Pastal l.l. 

The new swapping option provides more ?pace by moving the procedures 
CET and PUT from disk to main meracry only as Chey are needed by your 
pcogram. For this reason, using GET or PUT for files on 
block-a true Cured dfivices will be alow when using this swapping opcion, 
READ and WRITE, which use GET and PUT, tfill also be slow. UN1TR.EAD, 
UNITWHITE, BLllCKREAr», and BLOCKWRITE will be unaffected* 
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Application program wrtterG should not d^p^nd on the cKtrti 
nenory of SWAPGPDW heloa atfallabTe tTi the fuEura, Ho more 
raeraory is guaranteed than that available under Paacal 1,1, 

Certain planned tmhancenents to the Pascal system will teduce 
the memory avallablt^ to applications by approximBtely 800 
bytes- The new swapping option will allow prngraitH currently 
running at Che Unit of available nenory to run under the 
enhanced syatemi 



None of the three swapping procedures takes any parameEera when called 
from your progran- However, to uae these procedures, you rauat place a 
USES CHAINSTUFF declaration imraed lately afCet the progran heading, give 
the SRTCHAlN procedure call in a pro^raTii before It ternilnatea, 
place the appropriate swapping procedure call before the ptograra 
tennlnacioo if the swapping level is to be different For Che neitC 
program, and make »iure the the SY^TKM, LI BRWY file Is on line when your 
progi^ani la compiled and executed. 

Table A-l sunmarlzes the swapping procedure options available under 
Pascal i^l. 

The first two optiona. SWAPQFF and SUAPOTJ, are documented In the 
"Swapping Option" section of the Addenduin to Che Ajiple Pascal 
Operating System Reference Manual and In the "Chaining Prograos" 
section of the Addendum to Che Apple Paacal Language Reference 
Hanual. 
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CHAINSTUFF 
Procedure 

SWAPOPF 



SWAPnN 



SWAPGPON 



Systepi Accian 

Jiwaiiplng set to OFF. Set auto- 
matically at startup time. Ot 
set by calling SUAPOFF from your 
program before chaining to Che nexc 
program. 

First level swapping &ec to ON In 
order to gain apace In main memory* 
Sec by calling SWAPON from your 
ptogram before chaining to Che next 
prog ran. 

Second level swapping set to ON in 
order Co gain additional space 
in main memory. Incudes everything 
swapped at level I and adds S22 
more byten. Set by calling SWAPGPON 
from your program before chaining 
Co the nexc program. 



Total 
Heraory Cain 



2,26? 
bytes 



3.084 
bytea 



Table A-K Swapping OpCiona *fou Can 
Set FroEd Progrsis 



A NEW FUNCTION CHECKS A REMOTE DEVICE 

Your prograns Ciin uae a new hullt-in function, REMSTATUS, In the 

APPLESTUFF unit it SYSTEM. LIBRARV to read characters from or rfrlce 

charactera to a remote device connected to slot 2 of your Apple It 

or ITe and to keep Che program from waiting If the device la busy- 

REMSTATUS returns a value of the type RSTATTfPF_, which la declared as 

TYPE HSTATTYPE = (RSTATBUSY, RSTATREAQY. RSTATOFFLtHR) 
The focm for caUlni" REMSTATUS is 

H.EMSTATUS (HSCHANNEL); 
where the parameCer RSCHANNEL is declared aa 

TVPE RSCHANNEL - (RSOUTPUT, WSINPUT) 



A NBA' FUNCTION CHECKS A r^MOTE DEVICE 57 



RSSTATYPE and RSCHANNEL are predeclared In the ayscein. If you 
put their type declarationa In your program, you uill p,st an 
errot. 

RSCHANNEL Is given the value RSDUTPLTT If Che program needs Co write, 
RSlNPUT IE the program needs C^ read. 

This l3 Che way the funccian works: 

1, If there 19 neither an Apple ConmurLl cat Ions Cacd nor a flmiware 
protocol card In Blot 2, the function returnfl the v.^lue 
RSTATOFFLINE. 

2, If there la an Apple Co^nnunlt^at Ions Card oc a Elcmware card In 
slot 2 and RSCHA?JNEL Is KSIHPUT, the function returns the value 
RSTATREADY If a character Is walcldg to be readi othewlae It 
returns RSTATBUSY. 

1. If there Is sn Apple Connnunlcatlona Card or flmware card In 
slot 2 and Rl^f^HANNEL la RSOUTPUT, the function tetucns the 
value RSTATREADY If the output device la ready to accept a 
character fcom the progtam- nthecwtse Ic retumg RSTATBUSY. 

A. If REHSTATU5(RS0UTPUT) * RSTATBUSY and the program writes to 
the rernote device, Che program will wait. SimllarLy, tf 
BEMSTATUS(RSirJPUT) - RSTATHUSY and the program reads from the 
renoce device, the program vlll wait* 

The following program statements illustrate how REHSTATUS night be 
used In a terminal emulator program to read characters from or write 
Chem to a remote device: 

RFiPEAT 

TF (REMSTATUS (RSINPUT) =* RSTATREADY) THEN 
BEGIN 

UNITREAD (7, BUFlfl] , I, U)- 
UNIIVRITE tl, aUF|0J, I, iZ) 
END; 

IF KEYPRESS APTO (REMSTATUS fRSOUTPUT) ■ RSTATREAOY) THEN 
BEGIN 

UNITREAI (2, BUFlfll. 1, ^2); 
UNlTWRriE (B, BUFlfll, 1, IZ) 

ENH 
UNTIL BUF[fl| - OtriTCHAR; 



Of course, you wilt need to place a USES APPLESTUFF declaration 
afCec your program headln.^. Becaui^e the function is a butlt-ln one, 
tt need not be declared. 
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FOUR NEW SCREEN-CONTROL CHARACTERS 

With any Apple II or tie 40-column screen or any Apple He afl-column 
screen, you cao use the follnutng screen controls. 



Program SCflEenent 
WRITE <CEIRC5)); 
WRITE (GBRt6)); 
WRITE CCHRC15)); 
WRITE CCHRtKi)); 



Change Desired 
Make the cmaoc visible 
Make the cucaor invlslple 
Turn Inverse video on 
Turn Inverse video off 

Table A-Z . New Screen-Control 
Characters 

These chsracteta will give unpredictable results with some non-Apple 
flB-coluoin cards. 



THE -IGNORE EXTERNAL TERMINAL' FLAG: 
APPLE It AND APPLE HE 



Pascal K3 Includes a system flag — IdenCiFled sa the "ignore eiecernal 
terminal" flag — to help the application developer control which screen- 
uldch node is being used. The flag Is supplied on both the development 
(or standard) version and the various run time versions of Pascal l.Z 
used by application developers. But the program to set Che flag 
(called RTSETMODE ) Is provided only on the run-time VGr?:lons. 
Application developers will u-^e the flag primarily to te^c run-time 
versions of system applicactona they wish slwflya to run In i0-colunn 
mode. 

The flag la located in the directory area of the startup disk. Using 
RTSRTHODE, Che developer sets Che flag by putting a "I" In block 2, 
byte 25, bit 3, The flag ia read by the interpreter at startup Clme. 
(Note that these address numbers are relative to Eero. In other tfords, 
Che dealgnacior. "block 2" refers to Che third block, byte 2b to the 
twenty-BlJCCh byte, and bit 3 to the fourth bit.) 

When Che flag la set prior to startup, Che K2 Pascal avstera will 
Ignore any eU-colunn firmware card In Che Apple, Setting the flag 
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CflUB^e Che display Ci> operate only In A0-cnluni| mode, even it the Apple 
conputrer has an SB-column card la^talled. In effect, die flag E«tls 
the system to "lEnoro any external terminal catd." 



The Apple lie a0-Column Text Card Includes a special i(S-coluian 
screen mode. Althouffh you could enter thla special ftfl^coluinn 
node from a pcoj^cam by jrLlIng "GONTROL-0" to the screen, ue 
urge chat you not do so, Pascal does not auppnrt the use of 
thia special ^B-eolumn mode. [fBlng this iDode causes the system 
to behave unpredicCably and could liarn your pfo^tam. 



THE OPEN-APPLE, SOLID-APPLE, 
AND SHIFT KEY CONTROLS 



The OPEN^APPLE, SOLlD-APPI.E. and SHIFT fceya on the Apple He keyboard 
have saveral fLLnctions, one at the most useful of which allows Che user 
to send responsea to an application. (You will find referencea Co 
these Eunotlons tn the Apple lie Reference Manual and the Apple lie 
Owner's Manual, J 



Your application can teat the same kind at user reaponsca on an 

Apple It. Tnatead of preaslnft the OPEN-APPI.E or SOLTD-APPLE 

key, the user vould preaa button fl or huttoa I, respectively, 
on the hand controls. 



By using one or other of the following laethods, your ptograni can test 
whether the OPEN^APPLE, SOLlP-APPLK, or SHIFT key has been 
pressed— singly or In some combination — along with a character key. 
The fltat method allows you to teat only for the OPEN-APPLE key. Hie 
seccnd method allows you to teat whether any of these three keys has 
been pressed. 

The SHIFT key can be tested only It a prior hardware (nodi ficat Ion has 
been made to the Apple II ot He betnj? used to run a particular 
progtajD. The following discussion points out certain conditions 
necessary to achieve loeaningful results tfhen the SHIFT key ia being 
ceated. 
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Von will Bee several referenceB here to thia hardware 
modification, popularly known as the "game-paddle nod." More 
accurately, one should talk about It aa the "SHIFT^key mod . " as 
this manual does, because the SHIFT key rather than the game 
paddle connector is the target of the change, though both are 
**" Involved. To have this mndiflcatlon made to your Apple II 
or He, aee your dealer. 

You will leam In Che newt two sections which one of the two types of 
test to use in your program to check foe the use of the OPEN-APPLE Cor 
button 0), SOLID-APPLE (or button l), or SHIFT tey. Table ^^3 gives 
you an overview of which test ia appropriate to which user activity. 
(The teoD "Mod" in the table refers to the "SHIFT key modi f icstlon" 
just mentioned. ) 







Apple II 






Apple He 




Name of 
key 


Open 
Apple 


Solid 
Apple 


Shift 


Open 
Apple 


Solid 
Apple 


Shift 


Hardware 

required 


CoQnec L 
Hand-Ctrls 


Connect 
Hand-Ctrla 


Needs 

"Mod^' 


Built- 
in 


Built- 
in 


Needs 
"Mod" 


User key 


Button 


Button 1 


SHFT Key 


0-A Key 


S-A Key 


SHFT Key 


Type of 
test 
to use 


Hlfih-bir 
or 

UN ITS TAT 


UNITSTAT 


UKITSTAT 


Hlgh-blt 

or 
tlMTTSTAT 


UNITSTAT 


UNITSTAT 



Table A-3 . Testing for Use of 
OPEN-APPLE, SOHO-APPLE, and SHIFT 
fCeys 



THE HIGH-BIT TEST FOR THE OPEN-APPLE KEY 

There are two uaya tn check the OPEN-APPLE key on an Apple He or 
hucton on an Apple II: U) the hlgh-Mt test and (2) the UNITSTATUS 
test. The high-bit teat checka to see whether the hl«h-order bit of 
Che character read has been set as the reault of the user presainjj the 
OFCN-APPLE key along with che character key. An ordinal (ORD) value 
of l?a or more returned by the READ ataternent indicates that the value 
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al Che high-order biC {I2fi) haa been adiled Co the A^CEI cade value of 
the chfltacter, glsialllng that the OPEN-APPLE key haa been pceaaed 
along with a character ttey, FroTO a Pascal program, you can lirp the 
Pascal built-in KEYBOARlJ .ir INPUT file to read whatever chara[:tec was 
Cyped, HIFJITEST l3 a program UliJsCcaClnB chia method of cheching the 
OPEN-APPUE \^ey or button 0. 



PftOGHAM HIBITKST; 

VAB KEY :CHAR; 

BEGIN 
REPEAT 

READ (KEYflOAED, KEY); 

WRITE tKEY. ■ = \ ORD (KEY), ' '); 

IP ORD(KEY) >= 128 THEN WRITE ('OPEN-APPLE PRESSED'); 
WRITELN 
UNTIL KEY = "U' 
END. 



Normally, your own HIBITEST procedure would not Include the WHITE 
atatemeTit , which here acCs as an llluBtration, Sut would subi^ti^ute 
other atatPTiient? uglnp the Input values EtoTti the HEAD staCement. 

Note that thp hlgh-hiC test works only for Che OPEN-APPLE key or 
button 0; you cannot uae Chls aauie teat fee the SOLID-APPLE and SHtPT 
keys or fut buttons 1 or 2. RflCher, Che IINITSTATDS raethnd, described 
in the nent Rection, can be used to test theae, as well as to Ceat the 
OPEN-^PPLE key or button t^. Why use the hlgh-hU test at ail if Che 
UNITSTATUS test works for all three keys? The atiswer is that teating 
the OPEN-APPLE key or button t* UsLn^ the hlgh-btc tegt ia a little 
*:[nipler rind faster. 

If you flre an application developer who does not want the high bit of 
the character byte to be set by ptessing the nPEN-APPLE key or 
button ft, you may di^ablg Chla function if you wish. To do so, use a 
variant record to put a zero in location SBFLI (decimal -16621), A 
variant record. soTnetlrnes called a "crJx" record, hIIowb a progcam to 
incerpcet the same physical data in the variant part of the record as 
being of different types. This devlcp clrcuipwents the Pascal system's 
ncrmal restrinlon aj:;a!nst mi^iinp ^rariflhle types. In the prograu] 
DISABLE that follows, a reference to the field INT interprets the data 
as an integer, while a reference to the field PTH interprets the sane 
data as a packed array. 



-a 



T 



n 



PROGEUrt DISABLE; 

TYPE PA - PACKED ARHAY 10. .0] OF B..255; 

ADDR ■ BECOED 

CASE BOOLEAN OF 

FALSE: (INT: INTEGER) ; 
TRlfE; CPTR:*PAJ 
END; 






VAR A:ADDR; 

BEGIN 

A. tNT := -16623; 

A.PTtL^lBl ;- Z; 
ESn. 



ilocacton SBFllf 



.1 

r ^3 



l£ you have a prograic that prorapcs the user to presa OPEN^APPLE 
or button 9 alon^ with a character key, but you have disabled 
setting the high-order bit, then the ptogram will have to tiae 
the UNITSTATUS test Co determine whether the OPEN-APPLE key or 
button P has heen pressed. 



The progCfln ENABLE showH how Co te-enable the hlgh^rder bit netting ho 

chat KIBITEST can be used. 



PROGRAM ENABLE; 

TYPE PA = PACKED ARRAY [»..a| OP B.-I^"^; 
ADDR = RECORD 

CASE BOOLEAN OF 

FALSE: ( INT: INTEGER) ; 
TRUE: £PTR:-PA) 
END; 

VAR A:ADDR; 



BEGIN 

A. INT :■ -16623; 

A.PTR"[«J := 12fl; 
ENH, 



location SBFllI 
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ENABLE is iust like DISABLE, eKcepc for Che change in this stateraent 

A.PTR-101 :- t2fl; 
which again enables setting Che high-order bit. 
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THE UNITSTATUS TEST FOR ALL THREE KEYS 

Hlch Chts teat, your progrn^m can determine Chat 

1. a charACCer has been [ypcd; 

2. the OPEN-APPLE or SOLID-APPLE key £ot both) on an Apple lie waa 
presided when ■] chdrdcE.Ec was typed; 

3. button or bucron I {or hochj on an Apple TI was pressed when 
s cliaractpr waa typed; 

A, the SniFT key was pressed when a character was typed on an 
Apple IT or an ftpple He «lth tlie "SHIFT key mpd" Installed. 

Several things may Ciaufle you ta get Unexpected reaultH froai Che 
UNITSTATUS tea[i 



K 



2. 



Only the SHIFT key nn an Apple |L or tie utll get the SHlFT-key 
flag uhen pressed, Presglng CAPS-LOCH. CONTROL^E, or CDNTROL-W 
dofls not get the SHIFT-key flag, even Chough doing ao may 
change certain other keypress cesultii by activating the 
previously installed SHIFT-key nod. (See Appendtn D In this 
manual for a diacusalon of these other changes.) 

If chfl Apple II ot He doea not have Che SHIFT-key rnod , the 
flag set when the user pces^ea che SHIFT key may produce a 
randoip value thaC has no meaning when che UNITSTATUS test is 

made. 



3, If the hand control Is not conoecnad to the Apple II, the flag 
set when the uaer presses button or button ! qthv produce 
random values that have no meaning when the UNITSTATUS test Is 
made. 

4, If you have an Apple 11 with the hand control connected and you 
press button t? at startup time, the Hyfltem will autoina tic ally 
disable setting the high-order bit of Che charactec, and so Che 
high-bit teat will not work. Your instructions to the user 
should include a caution on this matter, 

UNITSTATUS is a Pascal huHt-ln procedure facilitating Itipot/output 
operations at the memory address level, just as do the move familiar 
IIHITREAD and UNlTURtTE ptoceduren. Here, In this contest, your program 
will use UNITSTATUS to retrieve from the console driver a value 
repreaencing which of the three keys has been pressed. Your program 
can also read the keyboard buffer data-byte, as Ic did in the high-btf 
test, to get the character the user typed. 

The foriH of the UNITSTATUS call is 

UNITSTATUS (UNITNUH, PAB. CONTROL)^ 
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• Where UNITNUM Ib ati eKpresalon with an integer value that la 
the unit number of a particular Input/ouCpiit device, In this 
case of Che console; 

• Where PAE ia a packed array of a type you name, called BYTE, 
vhlch Is meant to hold the keyboard data you want from Che 
console driver; 

■ Where CONTROL Is an expression with an Integer value 

referencing Individual bits to control the operation of the 
UNITSTATUS procedure. 

The CONTROL parameter tella the procedure that you want a transfer of 
status Information In the keyboard buffer from the console unit device 
CparajTieter UNITNUM) to the packed array (PAS), where Ic can be read. 

When you place a UNITSTATUS call in your program Co check Che ntirtus of 
the OPEN-APPLE, SOLID-APPLE, or SHIFT key, or any comblnfltlon of Chen, 
Inaert these parameter values In Che sCateioeat: 

1, Por UNITNUM, use the Integer "2", che unt C number of Che 
keyboard device. 

2, For PA&, use a packed array of byte-^in Che example Chat 
follows, "NCHARSBUFD[0|", which la Che first field of the 
record variable KEYSTAT, 

3, For CONTROL, use the Integer '"1", which specifies that you wane 
to gee status information on Che console input rather Chan to 
perform b control operation on the console Input or output. 

Note that the procedure UNITSTATUS does not have to be defined because 
[C Is built into Che Pascal language* 

KCHO Is a program demonstrating how a variable of type KEYSTAT ia 
used with the UNITSTATUS procedure to check for the use of one or 
more of these special keys along with n character key. 
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PROGRAM ECHO; 

TYPE BYTE ■ 0..Z55; 

VAa KEY -CHAR; 

KEYSTAT :REC0K11 

NCHARSBUPD : PACKED ARRAY 13-. 1) OF BYTE; 
SHIFT, SOLIDAPFLE, OPEKftPPLE i BOOLEAN 

END: 

BEGIN 

WITH KEYSTAT DO 
REPEAT 

UNlTSTATirS f2, NCHARSBUFD[01 , IJ; 
IF NCHARSBUFDI0I > « THEN 
BEGIN 

read (keyboard. key); 

white (key, ' - \ orq(ke¥)» ' m; 

:f openapplg then write ("open APPLK ■); 

if solidapplf; then write ('solld apple '); 

if shift then write { 'shift *); 

tJRITELN 
END; 
UNTIL KEY - '0' 
END. 



This demons CraCion proHrani diaplgye the characCer typed, as well as the 
ordinal value of the chflracter In the ftSCII gequence of characters. In 
addition. If any of the chree ypecig] keys has been preaaed along ulth 
the character key, It displays Che namea of the keys prsRsed. 
(Normally, your own ECHO procedure would not Include the WRITE 
statenienta, which here act as an IlLustratlon, hut uould subatltute n 
stateinent uqlng Che READ and UNITSTATUS outputs In a uay appropriate to 
your application.) 



THREE SPECIAL IDENTIFICATION FLAGS 






Pascal 1.2 Includes these special flags you niay use to Identify 

1. Whether the computar in use la an Apple II, or an Apple lie 
«tth or without an fla-Colujm Test Card or Branded 8B-Column 
Text Csrd; 

2. Whether the computer In use Is executing the Paecal 1.1 syatem 
oc the Paacfll 1.^ gystara; 

3. Which version of the Pascal Interpreter la eitecutlog on the 
computer in use— the 4BK, the 64K, or the liBK— and whether 
certain other variations ate aperatli/e. 
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.E. 
K 
B 

.S- 



-a 
a 



a 
a 
a 
a 
a 
a 
a 



FLAG TO CHECK THE COMPUTER TYPE 

By idenclfylng which machine it Is runitlriE on, an appltc 
Cor the Apple Tie can take advantage of the unique featu 
Apple He but recaio Che capacity to run on the Apple It 
location -16591 (SBF31 heitadec liial ) contains a flag you 
deteroine from within a program whether Che computer la 
an Apple He. If the flag is ^et wlch the high-order bi 
turried on. the machine is an Apple He. It blc 7 is tur 
iwchlne ifi fln Apple IT- (There la a possible third cage 
and bit 7 are both turned on — for a machine that is neit 
or ITe but is Apple He compatible. This posBlbillty is 
inactive but reserved should Apple Computer, Inc. later 
compuLer that Es not an Apple II nr lie hut ia Apple He 



atlon program 
res of the 

Memory 
may use to 
an Apple 11 or 
t (bit 7) 
ned off — the 
— where hit 6 
hec an Apple II 

curcently 
manufacture a 

compatible, J 



If the machine ia an Apple ITe, thia aame raemor/ location will also 
apecify whether the computer has an Sft-coluTiin card and whether tt also 
has Che auxiliary fi4K of RAH raemary available nn the Apple 
Encended e0-Column Text Card. 

The flag hit a^ttlngs Hated in Table A-i are made whenever the Pascal 
system starts up. 



If the computer 



then the byte aC laemory location -16591 

($BF3L Hex) haa these bit aetcingn: 
Bit 7 Bit 6 Bit 1 Bit 



Is an Apple He 
And has an Si-column card 
Ulth 64K auiiliacy card RAM 
Is an Apple II 



Table 4-A . Hardware Identlf teat ion 

MC Settings 





ON 


OFF 


OFF 


OFF 


ON 


OFF 


OFF 


ON 


ON 


OFF 


ON 


ON 


□ FF 


OFF 


OFF 


OFF 



There ia no built-in Pascal routine Co acceaa this flag byte. You have 
to use a Pascal variant record or a assembly language routine, 

CHECKID is a program, which you could Implement aa a procedure^ using a 
variant record to determine whether Che computer is an Apple He and 
whether it has an Sfl-colunffi card with or without the auxiliary 6&K RAM. 



*\^ 
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PROGRAM CHECK! [J; 



VAR 



BECtN 



BITftRRAY - PACKED AHRAY 10-. ?J OF BOOLEAN; 

ADDR - RECORD 
CASE BOOLEAN OF 

FALSE: <INT;INTEGER); 

TRUE: tPTR:"BITAElitAY}; 
END; 

AtADOR; 

UE» elGHTYCOLS. AUXb^KMEM: BOOLEAN; 



A. INT :- -165^1; (Location SBF31 Jieit} 

HE := (ADDR.PTR"!?]) AND (WOT AODR. PTR" ( 6 j ) ; 
EIGHTYCOLS :• ADDR, PTR' 1^1 ; 
AUK6AKMEM :■= ADDR, PTB" 1 1 1 ; 



END, 



If the conipucer la an Apple He, variable ITC wilt have a value of 
True ■ If Che conipiiCer in an Apple Up and has an at^-cnlumn cacd 
iriChout the 64K RAM, varlablea UZ and EIRHTYCOLS will hsve a value of 
True, tf the computer la an Apple He and haa an Sa-cQluirin card with 
Che 6iK HAM, the variables HE. EIGHTYCQLS, and AUXft^KMEM will have a 
value flf True . If the computer Is an Apple II, the three varlabUfl 
will all have a value of Fglae . 

FLAG TO CHECK THE PASCAL SYSTEM VERSION 

When Pascal 1.2 Is started up on an Apple II oc He, a flag 1b set aC 
menory address -16607 ($flF2l hex) to Identify irfhich Pascal veralon Is 
the one being used. 

• If Pascal 1.2 is Dperating, the tfalue of the byte at that 
location is "3". 

• If Pascal I. I Is operating, the value of the byte at that 
locBClon Is ^'2". 



FLAG TO CHECK THE INTERPRETER VERSION 

To Identify whtch Pascal intetpreCer is executing, another flag in set 
at HtflrCup time — at menory addresa -16&06 (SBF?? hen). This flag usee 
different bit settings to identify the varlallona being supported, aa 
Table i>-5 shows. 
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tndlcatefl 
The Pascal development system Is CKSCUtlng. 
The PaBoal run-tine systeo la executing. 
FldBtiof -point opetatlons are not supported. 
OperatlonB using sets ate not supported. 
The AflK Pascal Interpreter Is exei^uting. 

The b'lK Pascal Interpreter Is executing. 

The 12BK Pascal Interpreter Is executing. 



Thta bit aettlng ia reserved for future eyaten 
use. 

All console output Is directed to the Cent acteen 
pages, an eKCernal terminal, de an S0-cnlumTi 
card . 

All console output is directed to the 
hlgh-resolucion pages. 



^ Table ^-5 , Version Flags ^et at 



Location -16606 CSBF22 Hex) 



TWO IMPORTANT POINTER LOCATIONS 



Table 4-b telle you where these two Importiiiit Pascal pointers are 
located and deGcrlbes them. Although you cannot change thelt values, 
because they ace b fined part of the Pascal system, you can use 
variant records to see the current value In either locatlon- 
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Lacatlan 


DJ1 




Zero-PdRe 




Pointer 


S5A 




NP 


S5C 




KP 



ics PurpoBe 
Polnce to top of Pascal Aata heap, 
Pointa to Cop of Pascal progran stat^k 



Table ii-ft. Two Pascal Pointers 



NEW VALUES FOR THE UP-ARROW 
AND DOWN-ARROW KEYS 



The Apple Ite UP-ARROW and DOWN-ARROW tteys are hardwired en the KSCII 
values for CONTRnL-K and CONTROL-J. respecclvely , The dsflnlttons of 
"up cursor" and "dium cureoc" have been c:hanged In the Pascal I,? 
SVSTErt.MlSCINFO file to the Hame val^ea. 

To make the ^B-coIumn Apple II behave as under Pascal I. I— that Is, to 
make CONTBOL-0 and CONTROL-L move the cursor up and davn. 
cespectlvely—Pageal 1.2 cauaes the keystrokes CONTRQL-0 and CONTROL-L 
to produce the same ASCII values aa the keystrokes CO^TROL-^K and 
CONTROL-J, respectively- 

As a result of this alteration of key values, the ASCII values for 
CONTROL-0 and CONTROL-L can no longer he produced by Cypiie on Che 
keyboard of the Apple II. 

However, Pascal 1.2 users of an RO-column card on an Apple II may need 
to uae the old ASCII values produced by CO>JTROL-0 and CONTROL-L, If 
so, they nhould move to their startup disk the special Il3|*,MlSC!rJFC] 
file found on the APPLET; dlak of their Pancal 1.2 system. (For 
InaCructlona on how to do this, see tUe section "Special HISCLNFO Filet 
and Row to Use Them" in Chapter 2.) 



If you Cry to use an appHcetton program (designed to run on an 
Apple II In 40-i7o]umn inode) that makea hard-coded checltH for 
the old up-cursoc and dounTiiraor keyboard values, Che program 
ulll not work properly under Pascal l.l. Such 3 program ulll 
have to be changed to obtain the new key valuen (those for 
CONTROL-K and CONTROL-J) froni the Pascal 1.2 Si^TEH.MISCINFO 
file at I'sad time. The neicC section shorta how to do this. 
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READING THE UP-CURSOR 
AND DOWN-CURSOR VALUES 

To read the up-cursor and doun-curaor values from the SYSTEM. MI SC INFO 
file, you need only knorf that the 

• up^cursor value (KEY TO MOVE CURSOR UP) la at byte 78, and the 

• down-cursor value fKE? TO MOVE CURSOR DOWN) Is ut hyte 79 

of the SYSTEM. HISCINFO file. 

The following program fragment lllustratea the use of this 
InFonoatLon: 



VAR Up^ey 


: CHAR; 


DownKey 


: CHAR: 


CH 


: CHARi 



PROCEPLtRE SecKeya; 

VAR buf : PACKRD ARRAY IB, ,511] OF CHAR; 
f : FILE- 
BEGIN 

RESET Cf, '*SYSTEM,HISCINF0'); 

EF flLOCKREAD(f. huf, I) <> 1 THEW HEl^IN 

wrlceln ('Unable Co read I block of *5YSTEM.MISC1NF0' ) ; 
exit CPRDGRAMJ 
END {lf>i 

[JpKey -.' btif(7e]j 
DomRey :=■ bufl79] 
END {SetKeysl: 



BECIN {main program} 
SetKeys; 



READ [KEYBOARD, CH); 

IF OH='LlpKey TW^fi <Hhatever the program does for up-arrotffi> 

ELSE IF CH^OawnKey THEN <ditto for doun-arrows? 

ELSE etc 

END {EDsln program]. 

Note that this routine Is suitable for the Apple II and Apple lie, ulth 
QC without an SB-cQlumn card, hut does not uork for any eKtemal 
terminal that generatei? mulC Iple-character sequences such as ESCAPE-U 
and ESCAPE-D fur arrou keys. 
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CHANGES TO THE SEEK AND PUT PROCEDURES 



The Pascal Bystera'a SKEK and PUT procedures now work differently ftom 
the way they worked kinder Paacal 1.1, Here are the changes: 

L. In Pascal 1.1^ . if a program dtrecCa SEEK to find a record thac 
Is paac Che laat byte used in the li^at block of a dLalc fite 
SEEK positlona the file pointer ac the last byte used In the 
Ust block. 

In Pascal 1,2 , if a program direcca SEEK tQ find a record that 
is past the last hyte used In the last block of a disk file, 
SEEK first tclBH to tf)tpand the file. If Che file cannot be 
expanded — that Is, if there la another file stflrtlns right 
after Ic— the system returns an TORESULT of 8 ("no roora"). If 
the file can he expanded, SEKK does so. Then SP.f.K checks to 
see whether the record ic originally wag directed to find is 
within the new bounds of the file. If It Is not, the ayatem 
recurnfl an lORESlfLT of fl. If it Is within the new hounds, SEEK 
poEltLona the file pointer at the tecocd- 

2. In Pascal l.l , if a progtaoi directs SEEK to a position anywhece 
between the current fiOF and the EOF at the tlnie the file vas 
last RESET. SEEK does not refill lea file buffer with the 
correct block. Consequently, If the position being dought la 
not In the sane block as the pre-SEEK position, SEEK will not 
poflltlon the file pointer correctly. 

t° lascfll 1-2 , SEEK refills Its file buffer with the correct 
block and positions the file pointer correctly, 

3» In Pascal 1 , I > If a program attempts to extend a disk file 
dynamically by seeking to a record number that la after the 
last record In a file Imnedlately followed by another file, and 
Chen doing a PUT, the first block of the following file will be 
damaged. The c.iii6e of the damage la this: SEEK moves the file 
pointer to che last byCe used in the last block of the file, 
CSee 1, aboue). Then PUT discovery that It Is positioned at 
the end of che file, so it tries to expand che fite In order to 
put Che new record in. If the file can be expanded, PUT does 
HO- Unfortunately, PUT then adds the record without first 
checking to see whether the expanded file Has expanded enough 
to bold the record, tf U wasn't, the first block of the 
following file Is overwritten. 

In Pascal 1.2 , If PUT has been able to expand Che file. It 
checks to make sure that the record will actually fit In the 
remaining upace in the file without overlapping the file that 
follows. If there Is not enough apace for the record, the 
system returns on IHRESULT of a ("no room"). 

^- In Pascal 1 .1 , the ability to seek beyond EOF Is Inciinsistent , 
because SEEK never attempts Co expand a file, although PUT 






does. Consequently, soraetJmea SEEK will succeed in positioning 
the pointer after the last record In Che file, but other times 
it will not. 

In Pascal K2 , the ability to seek beyond EOE is consistent 
because both SEEK and PUT attenpt to expand the file If 
necesKary. fSee I, above.) 

You will find a complete Hat of bug fixes In Appendix A In this 
manual. 



TWO FEATURES NO LONGER OPERATIVE 



To streamline the memory requireraeat of the Pascal 1.2 operating 
system, we remaved ta/o previoualy available features. 

First, the operating system Ignores the "has slow terminal" flag In 
SYSTEH.f^ISClNF:^ as a feature that la no Longer useful. 

Second, the aystem assuiDes Chac every console device presently In use 
has a "backspace" value {usually ASCII 8). 




1^ Jl 
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The following bugs in PaHcal 1.1 have been corrected In Vaacal 1.2: 



COMPILER BUGS 



K A regular unit using (*SH segname*) or ('SR unl tnamE*) wga not 
United properly. Now It Is. 

2. If the Compiler Resident option (5R) was done on an IntrlnHlc unit 
which has a rfata aegmenC, the code segment was loaded before the 
data segment. Consenuently , assembly language routines containing 
addressee of Items In the data segmEnt did nt^i have those 
addresses cotcectly relocated. Wotf the data segment Is loaded 
first, and addresses ace cotrectly relocated- 

1. E)tlT(procedureriarie) did not work If Che procedure wan In a regular 
unit and had a procedure number greater than IZ7. Now it wocks 
correctly. 

A. Initlaltjation sections of nested units were f incorrectly) 

executed In the reverse order. Now they are executed in the • 
correct order. 



5. The Compiler did not Issue an error message If (*SR gegnaine*) or 
(*$R unitname*) referred to a non-existent segment or unit, tio\r 
It does. 



6, The Corapllet did not Issue nn error message If an Intrinsic unit 

had the same segmont number foe code aad dats segments. h^ow It 
gives an etror meHBage. 

7. The Compiler did not check for an eaipty data segment In an intrinsic 

unit. Now it does. 
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8, The Compiler issued an error ii3^f^ mtssags ("No data segment 
allocated") at the end of Che InitlflH^flC Ian gertlon, instead of 
at the hEgtnnlng oE Che irapleraentation, if an Intrtnald unit 
needed a daCa aeKraenC hut none was de[:iared In the UNIT acatement^ 
Nov ic glveE this error neasage at the beginning nf the 
InpleraenCaElon. 

9. If a proceduTe uaa declared FORWARD but n^ver defined, the 
Compiler error rnessage did not ^top the camplle and vis eaally 
o^erlaoked as the display scrolled. The doinplle looked successful 
but did not create a code file. Now Che CDiDplle is stopped, and 
the erEor mefisage is clear. 

10^ The ComptlEr aanetimes released symbol table space from the heap 
too aoDT!. Nou it does It at Che proper tlTne. 

11. Negative long integer constants and variables were not processed 
correctly. Now they are, 

12. The Compiler did not teat for a constant string longer than 80 
charactec^. Now It does, 

13. When a listing Haa turned aCf, the Compiler continued to emit a 
fom feed for every £*SP*) encountered. Now it doeq not. 

\fi. The Compiler could get randofi ercocs on identifiers that began 
with the letters H, J, hL, 0» «. f. or Z. Now it does not. 

15, The Compiler would iogoire all Compiler optionB that folLoued SS-H- 

If they were in a single statements Now Ee dijes not. 



ASSEMBLER BUGS 



1. The J^ssenbler did not process .AJ-IGN properly. Now It does. 

?. If there were no symbola io the pcogram, the Assembler would print 
garbage for the symbol table. Now it does not. 

3, A flxup to a tford that crossed buffei: boundaries would 

destroy the byte Following Che end of the buffer. Now It does 
not. 

A. The Assembler did not test for nested macros, which are illegal. 
Now It does test and gives sn appropriate error message if 
necessary. 

5. An .1%NDM without a corresponding ,^tACRO was not printed, and 
caused Che Assembler to give Inappropriate ^'Undefined label" 
errors. 
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6. If vx flflaembly contained more than Ifl procedures, the Assembler 
could Dwervrite SYSTEM. PASCAL data. Wow It does not. 

7. The AflsemMor did not correctly relocate ,1NTERP refecentea. Now 
it does* 

8. If there was garbage after the filename In an .INCLUDE statement, 
Che Assembler reported the error but continued to Che neit line 
without including the file. Now Che Asaembler includes the file 
after reporting the error. 



ilNKER BUGS 



1, The Linker sometliDes failed to reaolve Dl^Fa and PEFa properly to 
see that Che labels of two sssembly routines cnatch. Now It 
resolves ftien correctly do see chac Che Labels match* 

2. The syacem did nor allow regular units to use segments numbered in 
the range 16.-31 , Now Ic does. 



LIBRARY.CODE BUG 



1. Once the library file being built exceeded 299 bloclcB, the 

interface text Bectione of unity were no longer copied Into the 
file. Now It copies Chem Into Che file. 



UBMAP.CODE BUG 



L. LIBMAP.CODE did not list In the output file the interface text of 
units Chac started after block. 200 of the library. Now they are 
Hated. 



SEEK/PUT BUGS 



1. 



An attempt to extend a disk file dynaiAically by doing q SEEK to a 
record number falling after the final block, in the file, when Che 
space immediately after the file la occupied by another file, and 
Chen doing a PUT, resulted In writing over the first block of the 
following file. Now the PUT following the SEEK will get an 
lORESULT of 8 ("nn room") If there Is not enough apace for the 
record. (See Chapter /* of Chla manual for deCalla.) 
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2. If there was room in ttie last block of a file to contatn another 
record, s SEEK to a record numhpr Chat should have resulted in 
Expansion of the file resulted, instead. In the record being 
urLtten following the forraer lam: record. Now the syateiB first 
trlea to expand the file: if there is not enough apace for Che 
record, it gluea an lORESULT of fl (^'no rooo"). (See Chaptec f> 
of this manual for details.) 

^i SEEK uent to the wtong position whenever the prograni tried Co 
aeek Co a poslcion anywhere between the current EOF and the EOF 
at the time of the last RESET, Now SEEK refills its file buffer 
with the doEcect block and positions the polnttr cotrectly, CSee 
Chapter ^ of this manual for decalla.) 

i. \ SEEK to a lar^e record number in a file with a large record size 
uoutd take an inordinate amount of time. For ei^ample, 
SEEK(f J2flffl0). where "f" contains 250-bycp records, took about 15 
seconds. Now such a SEEK takes a niuch shorter CIbk, 



INPUT/OUTPUT BUGS 



1. If a dri^jer was iictached Co a unit number In the range 4, .12, 
UNITREADS and UNITURITES woi.ld work correctly, but file input or 
Dijt|iut using the volume name might not nork correctly. Now file 
input or output using the volume name works corcectly- 

2. The flexible dlek routines disabled Interrupts and left them 
disabled. Now jirogram Interrupts are re-enabled after the disk 
routines finish, 

3. A WRITE of a null string did not sat lOKESULT properly if lORESULT 
was non-zqro before the WRITE. Now tt does. 

4. BESET or REWRITE of a file on a DOS-formatted volume did not return 
an iORESLPLT error, as It should have. Now they recnrn an lOkESULT 
of 10 <"Flle not found"). 
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MISCELLANEOUS EXECUTION-TIME BUGS 

1. Tf the f*$NH*) option referred to a unit that had an assembly 
language procedure In Its INTERFACE, and that procedure was 
called frniD outside Che unit, a fresh copy of the code segiaent 
was loade^l onto the stack as it should be. But when the 
procedure termlnaCed, the storage occupied by that segment was 
not released. Repeated calls would then cause menory to fill 
with copies of the unit's code. Now the storage Is released 
properly. 

2. Repeated CONTROL-A's during compllea (to look at the second forty 
columns of the screen) could crash the system, and repeated 
CONTROL-A's during disk input/output could cause bad dlak writes- 
Now such use of CONTROL-A does not crash the ayste-D or cauae bad 
disk Hritefi. 

^, If the '"ignore entemal terminal" flag uaa aet with RTSETMODE, the 
card io slot 3 was Initialized even Chough it ^aas not used 
afterward, Now the card In slot 3 is not initialized. 

A. Sometimes when a program wrote a real number, using 3 wide field, 
a random character was written in the rightmost position of the 
field. Nov the number Is orrltten correctly- 

5. If an error occurred on a long-Integer computation, Cbe 
Interpreter entered a loop Instead of giving an eitecutian error. 
Now it gives an cKecuclon error. 

6. There was no check for stack overflow when Intrinsic-unlC data 
segments were loaded on the stack. Now there Is. 



TURTLEGRAPHICS BUGS 



1. The Paraineter YSKtP In the procflduro DRAUBLOCK did not work. Now 

Ic does. 

2. The nRAWBLOCK procedure did not draw the block correctly If part 
of the block extended pant the edge of the viewport. Now it does. 



m^^ 



aO 6USFIXES1N PASCAL 12 



MlSaLLANEOUSFXECUriONTIMEBUGS 61 






f APPENDIX B 



ON THE 
PASCAL 1.2 DISKS 



The loLlwIoa UflE ^f t:*tf? fUilbU dlakfl fi< 

P»ICa.l 1.1. The i inorCanC- I'tles 

iirH HDC Inctudtd ii ' -i i-iUh n slngli? 

i-:Eerl*k <*J. If a ftie l» rtn a iixsi. in ci iiLnco iIlTfi^rtnt from whr- 
.E vne In PjibciI t-t. It ((i mitrkod vltU a 4fotitil« incerlBk t**)- Vu 
d^t^lled [nft>r«iiciQa about chip vnr^oun tilfP And their uoe, see 
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St STEM. 
SYSTEM, 
SYSTEM. 
SYSTEM. 

SYS Ten. 

SKSTEM. 



PASCAL 

EUITOB 
FILEK 
LLHRART 
CTyLRSET 

SYNTAX 



APPLE 1 1 disk 

SVXTEH, APPLE 
I.PASCAL 

'■i.RUtTOH 
■i^FlLfifi 

SYSTEM. CH,'si 

SYSTEM, SYHTAX 



SYSTEM. CffMPU.KR 

* l| SY^TP.HJ.TNKVH 

£'■ ir 

(J 

LlBHAP.CUtrd** 



B2 



E = n 



6^00-OPCODP.S 
6500. ERRORS 

APPLE3: dlBk 

SYSTEM. APPLE 
BINDER. CODE 
LIPreFEEn,TEXT 
LINEFEED. CODE 
FORMATTER, CODE 
FORMATTER. DATA 
BALANCED, TEXT 
CROSS REP. TEXT 
DISK to. TEXT 
GRAFCKAHS.TEXT 
GRAf DEMO, TEXT 
HAZE LGOTO. TEXT 
HAEEL.HISCINFO 
HILBERT.TEXT 
IIA0,M[SCINFO* 
IIfl0,MISClSFO' 
I1E40.M1SCINFO* 
SETUP. CODE 
SPIRODEMO. TEXT 
TREE. TEXT 
IzaK. APPLE* 
t2aK- PASCAL* 
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APPENDIX C 



The Cdmpller trror mEfiHages have been revised for Pascal 1-?^ 
J— , Following Ib an updated Hat of all the Gflmpiler error messagea 
91 veil as Che oae new Asaembler error neasage. in Pancal 1.2; 

a 

3 COMPILER ERROR MESSAGES 



]; Hrcoc In simple type 

Z: Identifier eKpet^ted 

1: 'PaOGEAM' expected 

A: ' ) ' expected 

3: ' : ' expected 

^ ^ 6: Illegal symbol {ciiaybe missing ar extra ';* on line above) 

7i Ecrof In parameter List 

8; 'OF' ejipected 

9: 'C ' eiipected 

101 Ettor In Cype 

£ 3 II : ' [ ' eKpeczted 

\2: ']' CKpected 

li: 'EfJD' GRpected 

[ii ':' expected Cpoasibly on line above} 

15: Integec expected 

K 3 16: '=' expected 

17: 'BEGIN' fKpect^d 

18: Ectot In declaTatton part 

IS: Etrot in field-list 

20: ',' expected 

^ 3 21 : ' , ' expected 

22: 'Interface ' expected 

23: ' Idpleutentatlon' expected 

2ii: 'CODE' eitpected 

50: Error In constant 

51 : ' :=' expected 

52: 'THEN' eitpected 

53: 'UNTIL' expected 

5A: 'DO* expected 

55: 'TO' or 'DOUNTO' expected in FOR atateioent 

jJI ^ 50: tlrtor In factor (bad expression) 



a a 
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59: Error In variable 

131: Idenclfier declared tufde 

102: Lov bound exceeds high bound 

103: Id^nclfler la not of Che appropriate class 

104; Undeclared Identifier 

105: Sign not allr^ijed 

]0S: Hunbet expected 

107: Inconpat Ible subrart^^ types 

10S; File not allowed hece 

L09: "^ypit must not be ee^I 

110: Tagfleld type munt be acalai: Gt subrange 

111! Incompatible with tagfleld part 

113: lndejc type tnuat be a S(!aXar or a subrange 

llA: Bade type must not be real 

113: Bdfie type must be n acalar or a subrange 

117: Unaatlafled forward reference 

119: Re-specifl^d paramn not OK for a forward declared procedure 

126^: Function result type muHt be acalar, subrange or pointer 

121: File value parameter not allowed 

122: Result type of forward declared function cannot he re-epeclfled 

123: MlBSing reault type In function declaration 

125: Error In type of standard procedure parameter 

1Z6: Number of paraiaeters does not a^iree with declaration 

128: Result type does not a>^ree b^lth declaration 

129: Type conflict of oparandi; 

130: Expreaalon la not of set type 

ni: Only tests on equality are allowed 

132: Strict Inclusion not alLowed 

133: Pile compflHson not allowed 

13^: Illegal type of operandCa) 

135: Type of operand rauat he boolean 

136: Set element type louat he acalar or fliibrange 

137: Set element types must be compatible 

13S: Type of variable Is not array 

139: Index type Is not compaclble with the declaration 

140: Type of variable Ig not record 

1^1: Type of vi^rlable rauat be file or pointer 

1^2: Illegal actual parameter 

143: Illegal type of loop control variable 

l^ft: Illegal type of ejcpression 

145: Type conflict 

|A6: Aselanrnent oE files not allowed 

147: Label type incompatible with selecting depression 

I4B: Subrange bounds must be acalar 

149: Index type must not be Integer 

150: Assignment to standard function Is not allowed 

152: No such field In this record 

154: Actual parameter must be a variable 

155: Control variable cannot be formal or non-local 

156: Multldefined case label 

15B: No such variant in Ihia record 

159: Resl or string ta^fields not allowed 

Ibflj Previous declaration was not forward 

l&l: Forward declared twice 
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162: PflrameCer size puftC be tonstant 

165: Hultidefined label 

166: Hultldeclared label 

167: Undeclared label 

168: undefined label 

169: Baae type of set too large 

17^: Actual parameter max string length < fomal aax length 

lfl2: Nested units not allowed 

ia3: External rteclaratlon not allowed at Chla nesting level 

184: Entemal declaration not allowed in interface section 

lfi5: Segtnent declaration not allowed ta unit 

IB6: Labels not allowed in interface section 

187; Attempt to open library unsuccesaful 

188: Unit not declared In previous uses declaration 

189: 'llBea' not allowed at this nesting level 

H0: Unit not in library 

191: No private files In unit 

19Z: 'Uses* must be in Interface section 

194: Conraent must appear at top of program 

195: Unit not Importable (interface text not available) 

201: Error In real number — diait expected 

202: String constant must not exceed source line 

Z03: Integer constant exceeds range 

Z50: Too many scopes of nested identlCiers 

151-- Too many nested procedures or functions 

253: Procedure Coo long 

254: Procedure too complex 

273: No such uric or segment 

277: String too long 

301: No case provided for this value 

350: No data apgment allocated 

352; No code segment allocated 

353: Non-intrinaic unit called from intrinsic unit 

354: Too many segments for segment dictionary 

355: Data segment empty 

399: Implementation restrict Ion 

4(*fl: Illegal claracter in text 

4|j*l: Unejtpectet end of input 

402: Error in i-rrlte to code file, maybe not enough room on disk 

*03: Error while opening or reading include file 

404: Bad open, read, or write to Linker file SVSTEM.INFO 

405: Error while reading library 

40fa: Include file not legal in Interface nor while including 

408: {*SS+*) needed to compile units 

4(f9: General Compiler error 
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APPENDIX D 

ACTIVATING THE SHIFT-KEY MOD 




S 4 



If you want the SHIFT-key mod InfitaHed on your Apple II or lie, Bee 
your dealer. The only ceason for having It Installed on an Appl? ITe 
Is HD that a program can ceat to gee If the user has pressed the SHIFT 
key alone or In conjunction with another key In reaponee Co a proj^ran 
prompt. Hflvinft It Ingtalled on an Apple TI allows a program Co Cest 
for the I>HIKT key, allows you Co shift heCweon uppercase and lowercase 
charactera ualng the SHIPT key in Che normal fashion, and causes 
certain keyboard character translations, where, for exsniple, typing 
SKIFT-P producea an uppercase P instead of (? , 

Having the SHIFT-key mod Installed on an Apple II does net mean that 
Che laodl f Icatlon automatically works. Nor Is iC activated 
autonatically a" startup Cime. You must activate the modification In 
order to take advantage of some of Its functions, Vou may also 
deactivate the nodlf Icatlon when desifable. The modification does not 
have to be activated on an Apple He, 

■ You activate the modification by preBsing either CONTROL-E or 
CONTROL-U after starting up an application or the Pascal 
Byatem. 

■ You deactivate the nrndlf ication by pressing COrnHOL-T. 

Accluaclng the oodlElcatlon on an Apple 11 allova the SHIFT key to be 
used to obtain iipperc:>ise and lowerciiFie characters in the conventional 
flhtft-key manner. Buc two functions do not require modification 
activation: using and testing the SHIFT key aa a control, and 
obtaining certain new character translations. Table D-I lists the 
keyboard charac;er translations on an Apple 11 Chat are a direct effect 
of Che modification and that remain In effect before and after It is 
activated. 
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AQIVATING THE SHIFT-KEV MOO PI 



Typii^E or PreHBJDg Thesg Keys 



1 
CTRL-* 
CTRL-e 
CTRL-1 



Obtains This Character 



^ INDEX 



m m 



Table D- I . 5H1FT-Key Hod Character 
TranslatlanB 

Table 0-2 qiiinmarizea what results from the modi flcat ton when tc Is not 
acLlvated iind what tesults when It Is activated. 



Mod Inatallad but NoC Active 



The character trannlacions 

resulting frani the mad 

becoiQe aperativG — Apple Tl only. 

On an Apple II and an Apple lie, 
the SHIFT key can he tested 
using Che UNITSTATUS procedure. 



Hod Installed and Active 
<Apple tT Only) 

The character translatlenr 
remain operative. 



The SHIFT Icey tar be tested 
using the UNITSTATUS ptot^edute, 

Lowe r c a Be and u p perc ase 
charaoters can be obtained 

ualng the SHIFT key. 



Table D-'2 . Effedts o£ an Activated 
and Inactii^aced SHIFT-Key Mod 
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Z (percent olgn) prefix 15 

in Library Name File 49 
I3BK s^aten 29-51 

error messagcE J2 

features Z9 

nemnry organJiatlOn 33 

setting up 20 

startup dlaV 30 
AO-column scree q 

on Apple II 22-23, 24 

an Apple ITe 22-23, 25 
80-colunm card, wllh Apple II 
SQ-coluirm screen 

on Apple It 22-23, 25 

on Apple lie 22-23 
i5S-i option 3fl 



A 



accesalng Elles during progran 

execution 1^ 
Apple II. defined 4 
Apple II PluA i 
Apple lie ft 
Appie Paacal^ Language 

Reference Manual 4 
APPJ-P j^aacal Dperatlng^ Syatep 

Reference Hanua 1 4 
APPUOt disk i, 83 
APPLEl: disk 4, S3 
APPLK2: disk 4, 83 
APPLE3: disk 4, %t, 
APPLESTLFP unit 42, 57 
arrow keys 70 
Aasei^leT 

bug fixes 7B 

error message 90 
aasPDibly code 14, 3^. 36 
auxiliary nemory 29, 37, 38-39 

nuin aging 18-39 



70 



B 



backing up dlsti 6 
backflpacc value 73 
block volume units 19 



BLOCKREAD procedure 55 
BLOCKWRITE procedure 55 
boot, two-stage 14 
boot (flak, request for 14 
break in execution 21 
bug fixes 77-81 

AsBembler 78 

Contpiler 77-73 

exe cut Ion -tine 81 

Input/Output aO 

LIBMAF.CODE 79 

LlftfiARYXODE 79 

Linker 79 

SEEK/PUT 79-80 

lurtlegraphlcs SO 
button 60 
button ] 60 



CAPS LOCK key 20 
chaining 17 
CHAINSTUFF unit 8, 55 
characters 

reading and writing 57 

Bcreen^^untrol 59 
code file, executable 41 
code overflow 32 
-CODE suffix 43 
CODELOW variable 38, 39 
CODfiP variable 3fl, 39 
'^Codcapace overflow" nesasge 32 
Coi&pller 38. 40 

bug flxea 77-7B 

error irieaaages 87-89 
coTi^Cer type flag 67 
conserving dlak space 44 
control characters not echoed to 

Che screen 19 
CONTROL-@ 2 1 
CONTROL-] 20 
CONTROL-E 20, 91 
CONTROL- J 70 
CONTROL-K 
CONTROL-L 
COHTROL-O 
CONTROL-R 
CONTROL-T 
CONTEOL-W 



21. 70 

21, 70 

21, 70 

20 

21, 91 

20, 91 

CONTROL- OP EN-APPLE-RE SET 9 
CONTROL-RESET 9 
CONTROL-SHTFT-2 21 
copying disks b 
curaor mjtlon keys S, 20, 22 
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D 



dsLd EILbs, specifying using Z 1^ 
data HpHce in meTuory 3^, 35, 36 
DEL character 21 

DELETE key Zl 

devices, rentote ^7 

disk space, conserving 4ft 

disk-f ormatclng program 13 

DOWN-ARROW key 70 

down-cursor key 8 

down-curaot Value 71 



Editor, Pascal ^B 
error meGsages S7-90 
executable code file 41 
e K ecu [ton- time bug fixes 81 
Extended SO-Calumn Text Cflcd Z9. 
32, 33. 37, 38 



file pathnan? AD, 4| 

f 1 lename 1 5 

Filer, Pascal 3ft 

files 

□n Pascal I .2 dlaka 83 
library 40 

flagfl 

computer type 67 
hag slaw tecrainal 73 
Idenclflcatiou 66-69 
Igiiiire exrernal Cermlnfll 59 
Pascal InLerpretar ftS 
Pascal version 6S 

fleKlble disk 15 

floppy disk 15 

fOT-elan keyboards 21 

FormaCter 13 

error messages 1^ 



gain^ paddle mod &I 
GET ptocedute IB, 55 



H 



Rait command 9 
hand-control buCCons 19 
*'haa lotfer case" control 

variable 22 
"hag 3low terminal" flag 73 
heap pointer 70 
heap, Pascal data 34, 35, 36 
hexfldeciinal number syEten 33 
high-bit test for 

OPEN-APPLE key 61-63 



I/O 3ft. 35. 35. 37 
Identification Flafis 66-69 
ignore external terminal flag 59 
IIAO.KISGIWFO file 22 
IiaO.MISCINFO file 22 
llE4a-T41SClNFO f1 le 22 
Initialize command 9 
Input/Output 34, 35, 16, 37 
Input/Output biig fixea 80 
interpreter, Pascal 34, 35 , 36 
Intrinsic uni ts 42 
Inwetae video 

turning off 59 

turning on 59 



keyboard, foreign ?l 



Language Card 33, 3ft 
.LIB suffix 43 
LIHMAP.CODE 40 
LIBHAP.CODE bug H^es 79 
library file(s) 40, 42 

■■ore than one wirh e program 47 

options 40, 45 

searching in SO 

sharing 44, 46 
l.Cbriiry File, Program 43 
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■ I 4 

m « 
s :<! 

■ 4 
B 4 

B 4 

m- 4 

* 4 
B 4 

m 4 

s 4 

ft 4 
^ 4 



Library Nane ?lle 43 

I prefix in 49 

making 4 5 

using 46-49 
LIBRARY utility code 42 
LIBRARY. CDUE 40 

bug fixes 75 
Linker, Paacal 40 

bug fixes 79 
LONGTNTin unit fl 
louercaae cha-radters 20 

"has lower cane" variable 22 



M 



main memory 38, 34, 35 

raemory, gettini more 17 

raeinory inapa 33-37 

memory organiiatlon, features 3B 

MISCINFO files, special 22 

nixing Pascal \.\ and 1.2 7 

modification, hardware 60-61, 91 



N 

Name File, Library 43 
I prefix In 49 
iBaking 45 
uflins 46-49 



O 



OPEN-APPLR key 19, 60 
high-hit teat for 61-63 

operating sy&cem 3fl . 34. 35, 
36, 37 

overflow, code 32 



P-code 3a, 34. 35, 37 
Pascal I. I 4 

running programs under 1,2 

uparading SYfTEM, LIBRARY S 
Pascal 1,2 

disks f>, 7 

Operating system 7 

reasons to use 4 
Pascal 128K system 29-51 

error messages 32 



features 29 

lumory organization 33 

Betting up 30 

startup dink 30 
Pascal 64K system memory map 

33, 34-35 
Pascal data heap 34, 35, 36 
Pascal interpreter 34, 35, 36 
Pascal Interpreter flag 68 
Pascal operating system 38, 3ft, 

35, 36, 37 
Pascal prefix 48 
Paucal program stack 34, 35, 36 
Pascal startup screen |4 
Pascal version flag 68 
PASCALtn unit 8 
pathname 40, 41 
percent prefix (S) 15-17 

accessing fi ies 16 

chaining 17 

in Library Name File 49 
pointer 

heap 7[} 

stack 70 
pointer locations 69 
Program Library File 43 
program segments, Coo many 
program units 

intrinsic 42 

regu lar 4 2 
PUT procedure Ifl. 55 

changes 72 



Q 



19 



R 



READ procedure 55 

reading up- and down-cursor 

values 71 
regular units 42 
remote deuJcea 57 
REMSTATIfS function 57 
reserwed segments 40 
rigid disk 15 
RSTATTYPE value 57 
RTSETMODE program 59 



INDEX 95 



lSS-1 option 33 
BHJtng dialt space ^* 
screen-toncrol charflctern 55 
Hearching In library files ^0 
SEKK procedure changes 72 
SEEK/PUT hug flupB 79-BO 
segiDenEa 

fldditlofial with l?aK 40 

reserved ^-n 
SETCHAIN pracertiire call 5& 
Bharlng library files A6 
SHIFT key 19, 60 
SHIFT-key nod 61, 51-SZ 
SOLID-APPLE key 19, 60 
special MISClNt-0 fllea ^^ 
"SCflck overflow" meaaage 32 
scack pointer 70 
stack. Pascal prDgram 34, 35, 
startup 

one-drive system 9 

twQ-drlve sygtem 9 

tWEi-HEage \h 
startup rilKk 

I^Sk pyeteiQ 30 

TequEBt for 1^ 
startup Bcreen lA 
SWAPGPON procedure 55 
SWAPOFF procedure 55 
SWAPON procedure 55 
swapping during contpllacion 3ft 
awapplna opcionfs) 

pragran lei^el 55-57 

system level 17-13 
system size, flndfng T4 
SYSTEM, APPLE file 29 
^ySlTilM.LlBRAHV file 42, 57 

upgrading 9 
SYSTRM.MISCINFO file 22 
SYSTEM. PASCAL file 7, 29 
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hlgh-hlt foe OPEN-APPLE &1-63 

UNITSTATOS 6A-65 
TURTLEGkAPHICS unit B 
TlirtlegraphicB bu^ fixes 10 
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unltts) 

block volume 19 

Inttlnslc A2 

tegular 42 
unit number 40, 41 
UNTTREAD procedure 55 
UNITSTATUS teat 6^-65 
UNITWRITE procedure 55 
UF-ARHOW key 70 
up-curflor key B 
up-curaor value 71 
uppercaue characters 20 
USES APPLESTUEE declaration 5fl 
IfSES CHAINSTUFF declaration 5ft 
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volume name 15, 40, i^ I 
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WRITE procedure 55 
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lero-page pointer 39 
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UCSD PASCAL SYSTEM USER'S 
SOCIETY (USUS) 

GET MOEIE FROM YOUR PASCAL SYSTEM 
JOIN USlfS TODAY 

USUS Is the USER'S GROUP for the moat widely used, machine-Independent 
aoftuate sysceni. 

If you use UCSD Pascal*, Apple Pascal**, or Che UCSD p-System*. USUS 
will link you with a comraunlcy of users who share your Interests. 

USUS vaa forised to give uaers an opportunity to procoote and Influence 
the developnenc of UCSD Pascal and the UCSD p-System, and to help them 
learn more about their systems. USUS la non-proflt» and is not 
affiliated with any vendor. 

Keiabers get access to the latest UCSD Pascal infornation, and to 
extensive Pascal enpertlBe, In USUS, you have fornaL and infornal 
opportunities to caiamunlcaiie with and learn from other u&erB via the 
following membership benefits : : 

NATIONAL HEETtNGS twice a year let you learn from experts and try out 
the Eieveat producta. Meetings feature hardware and software 
demonstrations , tutorials, technical presentations and information, 
reduced-cost software library access, SIC meetings, and a chance to aak 
questions of major vendors. 

USUS NEWS AND REPORT brings you news and information about your 
operating system four tines a year. It contains technical articles and 
updates, library catalog listings. SIG tepocta, a software vendor 
directory, and organizational news, 

ELECTRONIC HAIL puts DSUS subscribers In touch wtth a nationwide network 
of uaers. CompuServe MUfifJS SiG provides a database and bulletin board 
comiun lea t Ions. CTE Telemall accomodates one-to-one messages. 

SOFTWARE EXCHANGE LIBRARY offers an estenaive collection of tools, 
ganes, applications and aids, in UCSD Pascal source code gt nominal 
prices. 

SPECIAL INTEREST CROUPS zero in on specific problems, and represent 
member interesta with oanufacCticers 

*DCSD Pascal and UCSD p-Syatem are trademarks of the Regents of the 
University of California. 

** Apple Pascal is a trademark of Apple Computer Inc. 

DiHclfllraer: The statement above is made by USUS. Its appearance here 
Is for your Information, and does not constitute an 
endorsenent or warranty by Apple Computer. 
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USUS MEMBERSHIP 
APPLICATION 



1 ui flpplylrig for 



525 Individual meinbershlp 
5500 organleaclon memhetship 
S air nail service Purcharge 



RatvB are for 12 uonths and cover surface nailing of the newaletcer. If 
you realde outside of North America, air nfflll service Is available for a 
surcharge, tc is as follows; S5 annuflUy for those In Che Caribbean. 
Central America, Colonbifl. and Venezuela; SIO annually to thope In South 
Anericfl. Turkey, and Worth Africa; and Sl5 for al] others. Check ar 
noney order should be drawn on a U.S. bank or U.Pl. Post Office. 
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Name/Title 

Affiliation 

AddreflD 

Phone 



TWX/TelBK 



Option: Do noC print my phone number In USUS rosters. 
Option: Print only my name &r\d country In [fSUS rosters. 
Option: Do not release my name on matllng lists. 



Computer SysCeni: 6502/Apple 



Other 



I an interested In the following Codmlt tees/ Special Interest Groups 



Advanced Syatem editor SIG 

Apple SIC 

Application Developer's SlG 

CoQimLinlcationg StG 

File Access SlG 

Graphics SlG 



Meetings Conmittee 
Hcidula-2 SIC 
Publicationp Conmittee 
Software Exchange Library 
Technical Issues Committee 
UCSU Pascal Compatibility SlG 



Mall coinpleted application with check or money order payable to USUS and 
drawn on a U.S, bank or U.S. Post Office to 

Secretary, D3US 

P.O. Box ]US 

La Jolla, CA, 9203B 
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